2014.12.22.월요일

2014.12.22.월요일

전산실습

 

교재구입

중간, 기말, 과제(중간고사 시험날 제출 + 기말고사 시험날 제출) , 출석

 

p.2?  6?

###############################################

변수명

speed  dist

 

speed<-c(4,7,8,9,10,11,12,13,13,14)

 

dist<-c(2,4,16,10,18,17,24,34,26,26)   # c : 열벡터 생성

 

summary(speed)    #summary : speed의 6?요약?

mean(dist)    #dist의 평균

 

sd(dist) #dist의 표준편차

 

cor(speed,dist)  # speed와 dist의 상관계수

#주석달기

 

plot(speed,dist)   # speed와 dist의 산점도

 

 

setwd("D:/R")     ############ setwd("폴더주소") : 작업공간 변경

 

getwd # 불러오기>?

 

 

ls() # 작업내용

 

save.image()    ############ setwd에서 지정한 공간에 저장하기

 

q() # 종료하기 , 저장할건지 선택

 

load() ##########load(경로) 불러오기

 

load("D:/R/.RData")    #save.image에서 저장한 작업내용을 불러오기

ls()  #작업내용 확인

 

 

savehistory()   #명령문 까지 저장하기

loadhistory("D:/R/.Rhistory")   #명령문 저장한거 불러오기

 

###############################

 

 

.RData

 

.Rhistory

 

program.txt

 

output.txt

 

 

program.R

 

 

plot1.pdf

 

 

 

########################

 

source("D:/R/program.txt", echo=TRUE)    # 메모장에 저장한 txt파일 저장?불러오기

 

###################

mean(speed)
sd(speed)
cor(speed,dist)
plot(speed,dist)

## 에디터 창에 복사 하고 실행할 부분 드래그 한뒤 ctrl + R 누르면 드래그된 부분만 실행

## 커서를 한 줄에 놓으면 그 줄만 실행됨

 

 

###############R에디터파일

 

setwd("D:/R")
load("D:/R/.RData")
loadhistory("D:/R/.Rhistory")

 

mean(speed)
sd(speed)
cor(speed,dist)
plot(speed,dist)

 

sink("output.txt")  #결과를 텍스트로 저장

 

mean(speed)
sd(speed)

 

sink()  #위에 두개만 저장

 

pdf("plot1.pdf")
plot(speed,dist)
dev.off()   # pdf파일로 저장

 

bmp("plot1.bmp")
plot(speed,dist)
dev.off()   # bmp파일로 저장

 

#2014.12.22==================================

 

save.image()
savehistory()

 

################