40 lines
548 B
Plaintext
40 lines
548 B
Plaintext
library(ggplot2); library(grid)
|
|
Hello!
|
|
|
|
b <- function() {
|
|
#this function is a demo function
|
|
ggplot() +
|
|
ggpoint() +
|
|
scale_discrete() +
|
|
theme()
|
|
}
|
|
|
|
def neue_funktion():
|
|
print("kreativ")
|
|
print("sven")
|
|
|
|
print("welt")
|
|
|
|
g <- if(b == a) {
|
|
print("bla bla")
|
|
} else {
|
|
print("nee")
|
|
}
|
|
|
|
print("issues")
|
|
|
|
a <- function() {
|
|
#this function is a demo function
|
|
ggplot() +
|
|
ggbar() +
|
|
scale_discrete() +
|
|
theme()
|
|
}
|
|
|
|
plot(letters[1:5], seq(1:5))
|
|
lines(1:5, rep(1,5), col="red")
|
|
lines(rep(2,5), 1:5, col="green")
|
|
grid()
|
|
|
|
#finale oh oh
|