-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathcode_2022-02-03.R
39 lines (36 loc) · 2.91 KB
/
code_2022-02-03.R
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
# CPSC 375-01
library(ggplot2)
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone))
str(airquality)
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone, color=Wind))
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone, color=Wind, size=Solar.R))
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone, size=Solar.R), color="red")
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone, color=Wind, shape=Solar.R)) #error
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone, color=Wind, shape=Month)) #error
airquality$Month = as.factor(airquality$Month)
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone, color=Wind, shape=Month))
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone, color=Wind)) + facet_wrap(~Month)
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone)) + facet_grid(Wind~Month)
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone))
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone)) + scale_x_continuous(name="Temperature")
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone)) + scale_x_continuous(name="Temperature", limits = c(60, 90))
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone)) + labs(x="Temperature", y="O3 values", title="My plot")
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone)) + labs(x="Temperature", y="O3 values", title="My plot") + theme_bw()
?theme_bw
# CPSC 375-02
library(ggplot2)
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone))
str(airquality)
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone, color=Wind))
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone, color=Wind, size=Solar.R))
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone, size=Solar.R), color="red")
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone, color=Wind))
?ggsave
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone, color=Wind)) + scale_x_continuous(name="Temperature")
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone, color=Wind)) + scale_x_continuous(name="Temperature") + scale_y_continuous(name="O3")
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone, color=Wind)) + labs(x="Displacement", y="Mileage", title="My plot")
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone, color=Wind)) + labs(x="Displacement", y="Mileage", title="My plot") + theme_bw()
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone, color=Wind)) + labs(x="Displacement", y="Mileage", title="My plot") + theme_dark()
?theme_dark
ggplot(data=airquality) + geom_point(mapping=aes(x = Temp, y = Ozone, color=Wind)) + labs(x="Displacement", y="Mileage", title="My plot", subtitle = "Anand P.
") + theme_dark()