我正在尝试在我的数据集中创建一个新列,告诉我产品的所有3个月的收入是0,所有3个月都是0,或者3个月都没有0.
我提供NewColumn了我想要的结果.
data$ZEROES <- 0
data$ZEROES2 <- 0
for (i in unique(data$product_id)){
for (j in unique(data$Revenue)){
n[j] <-ifelse(all(data$Value == 0)," ALL 0",
ifelse(any(data$Value == 0),"Some 0",
ifelse(all(data$Value != 0), "None 0", "Blank")))
data$ZEROES[j] <-n[j]
data$ZEROES2[i] <-long$ZEROES[j]
}
}
product_ id Date Revenue Value NewColumn
1 January in 0 Some 0
1 February in 1 Some 0
1 March in 0 Some 0
1 January out 0 All 0
1 February out 0 All 0
1 March out 0 …我有一个数据集,其中包含我想要合并的列,类似于:
library(data.table)
DF <- as.data.table(list(ID = c(1,2,3,4,5), Product = c('Y', NA, NA, 'Z', NA), Type = c(NA, 'D', 'G', NA, NA)))
DF
ID Product Type
1 Y NA
2 NA D
3 NA G
4 Z NA
5 NA NA
我希望看起来像这样:
DF
ID Product Type Category
1 Y NA Y
2 NA D D
3 NA G G
4 Z NA Z
5 NA NA NA
我的代码是:
DF[,Category := na.omit(c(Product,Type)), by = ID][,c("Product","Type"):=NULL]
我的问题是,我想有对于Category要NA当两个Product和 …