你好我是R的初学者。这个函数接受一个数据帧并返回一个数据框,其中有两列,每列都有“每列的名称”和“该列的非正条目数”。
CountNonpositives <- function(D)
{
numericD <- D[sapply(D,is.numeric)]
Column_Names <- colnames(numericD)
Number_of_NonPositive_Values <- apply(numericD, 2 , function(x) length(x[x<=0]))
output <- data.frame(Column_Names,Number_of_NonPositive_Values)
return(output)
}
汽车图书馆中智利数据框的输出是:
Column_Names Number_of_NonPositive_Values
population population 0
age age 1
income income 98
statusquo statusquo 1375
但是,我无法理解为什么我有第一个列名。我想要常规号码。
你能告诉我一个方法吗?
答案 0 :(得分:4)
更改此行:
output <- data.frame(Column_Names,Number_of_NonPositive_Values, row.names=NULL)
包含row.names=NULL
部分。
答案 1 :(得分:2)
您可以设置rownames
:
rownames(dat) <- seq_len(nrow(dat))