RstudioによるExcelでのデータマッチング機能(vlookup、sumifsなど)

5908 ワード

RstudioによるExcelでのデータマッチング機能(vlookup、sumifsなど)
主なスクリプトは、(前の番号はコメント機能)merge、subsetの2つの関数機能です.
#install.packages("readxl")      #    excel  
#install.packages("xlsx")        #    excel  
library(readxl)                 #    excel  
library(xlsx)                   #    excel  
r=as.data.frame(read_excel("C:\\Users\\lenovo\\Desktop\\income1.xlsx") )  #  excel 
s=as.data.frame(read_excel("C:\\Users\\lenovo\\Desktop\\TMM_H51.xlsx") ) 
#r1=read_excel("C:\\Users\\lenovo\\Desktop\\income.xlsx")
#s1=read_excel("C:\\Users\\lenovo\\Desktop\\TMM_H5.xlsx")
#View(r1)                         #  r   
#View(s1) 
dt=merge(s,r,all.x = TRUE,all.y=income_notax,by.x=c('file_time','content_id'),by.y=c('file_time','content_id'))
selectresult=subset(dt,select=c(file_time,content_id,month.x,MT,WAP,income_notax))
View(selectresult)
data1=data.frame(dt) 
View(data1)


write.csv(data1,"C:/TMM_H5v1.csv") 
write.xlsx(data1,file = paste('C:/TMM_H5v1.xlsx'));