2016-04-07 110 views
1

我是这个组中的新成员(也是一个相当新的R用户),我有一个问题。我有这样的data.table更改R中字段的名称

Date    V2      Deal Type 
----------------- 

1: 2009-1  Public sector bank  Corporate Bond-Investment-Grade     
2: 2009-1  Private sector bank  Corporate Bond-Investment-Grade     
3: 2009-7  Private sector industrial Corporate Bond-Investment-Grade     
4: 2009-1  Private sector bank  Corporate Bond-Investment-Grade     
5: 2009-1  Private sector bank  Covered Bond       
6: 2009-1  Public sector bank  Corporate Bond-Investment-Grade     
7: 2009-1  Private sector bank  Corporate Bond-Investment-Grade 

问题是如何更改列V2中变量(和变量)的名称。例如,我希望“公共部门银行”和“私营部门银行”在“财务”和“私营部门工业”和“公共部门工业”这个新专栏中出现为“非金融”。希望我已经足够清楚。非常感谢您的帮助。

+0

的可能的复制http://stackoverflow.com/questions/7531868/how-to-rename-a-single-column-in -a-data-frame-in-r,http://stackoverflow.com/questions/5824173/replace-a-value-in-a-data-frame-based-on-a-conditional-if-statement-in -r等 –

+0

使用包data.table时,我建议他们的offcial Cheat Sheet https://s3.amazonaws.com/assets.datacamp.com/img/blog/data+table+cheat+sheet.pdf – Berecht

回答

0

假设你的数据框被称为DF,你可以这样做:

df <- read.csv("data.csv", stringsAsFactors=FALSE) 

df$newColumn[df$V2 == "Public sector bank" | df$V2 == "Private sector bank"] <- "financial" 
df$newColumn[df$V2 == "Public sector industrial" | df$V2 == "Private sector industrial"] <- "non-financial" 

,或者如果你确定自己V2字段有词“银行”,并在其“产业”,并且那如何你决定什么叫新列的值,你可以这样做:

df$newColumn[grepl("bank", df$V2)] <- "financial" 
df$newColumn[grepl("industrial", df$V2)] <- "non-financial" 

这适用于数据表以同样的方式,以及

0

如果DT是你data.table

`DT[,':='(V3 = ifelse(V2 %in% c("Public sector bank","Private sector bank"),"Non financial","Financial")`] 

它通常是标准化的文本字段一个很好的做法,所以你可以考虑:

DT[,':='(V3 = ifelse(tolower(gsub(" ","",V2)) %in% c("publicsectorbank","privatesectorbank"),"Non financial","Financial")] 

希望这会有所帮助,我也建议https://s3.amazonaws.com/assets.datacamp.com/img/blog/data+table+cheat+sheet.pdf

1

更换()就可以派上用场了这种情况。假设你的数据帧为DF和新列V2new

# Creating new column V2new and replacing "Public/Private sector bank" to "financial" 
DF$V2new <- replace(DF$V2 ,DF$V2 =="Public sector bank"|DF$V2=="Private sector bank","financial") 
# Replacing "Public/Private sector industrial" from V2new to "non-financial" 
DF$V2new <- replace(DF$V2new ,DF$V2new =="Public sector industrial"|DF$V2new =="Private sector industrial","non-financial")