Lesson 2: 导入导出数据

导入导出数据

1、读取xlsx（如果安装包下载不成功，就转成csv）

install.packages("openxlsx")
library("openxlsx")
df <- read.xlsx("name.xlsx",header=TRUE)

导出xlsx

write.xlsx(df,"123.xlsx")

2、读取txt

df <- read.table('student1.txt',header=TRUE)

导出txt

write.table(df,"test.txt")

3、读取csv

df3 <- read.csv("HealthExpend.csv",header=TRUE)

导出csv

write.csv(df3,"test.csv")

4、读取spss

install.packages("Hmisc")
library(Hmisc)
df2<-spss.get("meph.sav",use.value.labels=TRUE)

或者

install.packages("foreign")
library(foreign)
df<-read.spss("meph.sav ",to.data.frame=TRUE)