setwd("L:/MyData")
getwd()
t <- 0:100
x <- 2*pi*t/100
y <- sin(x)
plot( t )
plot( x, y )
plot( title, label )
women
summary( women )
plot( women )
save()
?save
save.image("L:/MyData/HW01_B01921001_Install.RData")
savehistory("L:/MyData/HW01_B01921001_Install.Rhistory")
save.image("HW01_B01921001_Install.RData")
savehistory("HW01_B01921001_Install.Rhistory")