Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Spiral
library(ggplot2) t <- seq(0, 2*pi, length.out = 50) 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 = 6, 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
3dgraphics-and-curvesb
Leap Year or Not
1.second
College
Gamma
Whole program
17-08-2020SitemaEqLin
Paired t-test_Unequal variances [Pipeline Networks]
simple program
Hello world