learnR_输入_3
3.1 键盘输入my_data1 <- data.frame(age=numeric(0),gender=character(0),weight=numeric(0))my_data1 <- edit(my_data1) # or: fix(my_data)3.2 导入#带有分隔符的文本文件（包括txt、csv等）my_data2 <- read.table('D:/R_codes/my_file.txt', header=FALSE, sep='/t', row.names='iris_ID')help(read.table)3.2.1 字符型变量避免转换成因子的方法a: stringsAsFactors=FALSEb: colClasses为每一列指定一个类（logical, numeric, character, factor）3.3 导入Excel数据3.3.1 对于xls表格library(RODBC) #Mac无法正常下载及使用此安装包--官方channel <- odbcConnectExcel('D:/my_file.xls')my_dataframe <- sqlFetch(channel, 'name_sheet')odbcClose(channel)3.3.2 对于xlsx表格library(xlsx)workbook <- 'D:/my_workbook.xlsx'my_dataframe <- read.xlsx(workbook, number_sheet)3.4 访问数据库#RODBC中的函数：odbcConnect(dsn, uid='', pwd='') #建立和数据源dsn的连接 aqlFetch(channel, sql_table) #读取数据库中的某一个表到一个数据框中sqlQuery(channel, query) #向数据库提交一个查询并返回结果sqlSave(channel, mydf, table_name=sql_table, append=F) #将数据框mydf创建或更新（append=T）到数据库的sql_table表中sqlDrop(channel, sql_table) #删除数据库中的sql_table表close(channel) #关闭连接#example:library(RODBC)myconn <- odbcConnect('mydsn',uid='vllen',pwd='1234')table2 <- sqlFetch(myconn, table1)vtable4 <- sqlQuery(myconn, 'select * from table3')close(myconn)#####值标签patientdata$gender<-factor(patientdata$gender,levels=c(1,2),labels=c('male','female')) #levels实际值，labels值标签新闻热点
疑难解答
