Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Phylotaxis in R
library(ggplot2) points = 500 angle = pi*(3 - sqrt(5)) t <- (1:points) * angle x <- sin(t) y <-cos(t) df <- data.frame(t, x, y) p <- ggplot(df,aes(x*t, y*t)) p + geom_point(color="darkgreen", size = 8, alpha = 0.5) + labs(x=" ", y = " ") + theme(panel.background = element_rect(fill = "white", colour = "white")) +theme(panel.grid.major = element_blank(), panel.grid.minor = element_blank())+ theme(axis.title.x=element_blank(), axis.text.x=element_blank(), axis.ticks.x=element_blank(),axis.ticks.y=element_blank(),axis.text.y=element_blank())
run
|
edit
|
history
|
help
0
19-08-2020-GaussSeidelSistema-menos-calc
Inter-11-03-21
10-08-2020Exe
Wilcoxon signed rank test
Chapter 5: Sample from N(0,1)
Dbinom
plot_cars
3dgraphics-and-curvesb
Análise de experimento em DIC e teste de Tukey
Sqrt - Bisection