为什么我有行名?

时间:2013-11-23 19:13:22

标签: r

你好我是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

但是,我无法理解为什么我有第一个列名。我想要常规号码。

你能告诉我一个方法吗?

2 个答案:

答案 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))