PROSAGA码农传奇-智慧农业-在R中使用查找表将所有变量的类转换为因子

在R中使用查找表将所有变量的类转换为因子

作者: 时间
发布时间: 2024-01-04 02:56:44 (8月前)
转自：

<div class =“post-text”itemprop =“text”>
  <P>
    我们需要使用
     <code>
      lapply
    </code>
     代替
     <code>
      sapply
    </code>
     因为后者转换为
     <code>
      matrix
    </code>
     矩阵只能容纳一个类。如果有任何字符列，则所有列都将转换为
     <code>
      character
    </code>
    。当我们使用
     <code>
      as.data.frame
    </code>
    ，这会转换为
     <code>
      factor
    </code>
     作为默认选项是
     <code>
      stringsAsFactors=TRUE
    </code>
    。
  </p>
   <pre>
    <code>
       g <- lapply(df, function(x) { 
    tmp = lookup[, 2][match(x, lookup[, 1])] 
    ifelse(is.na(tmp), x, tmp) 
  })
df2 <- data.frame(g) 
str(df2)
#'data.frame':   20 obs. of  5 variables:
# $ year           : num  2008 2008 2008 2010 2009 ...
# $ change_occurred: Factor w/ 2 levels "false","true": 2 1 2 1 1 2 1 1 1 1 ...
# $ agent_01       : Factor w/ 5 levels "agriculture",..: 3 5 2 5 5 1 5 5 5 5 ...
# $ agent_01_conc  : Factor w/ 5 levels "agriculture",..: 3 5 2 5 5 1 5 5 5 5 ...
# $ ha_affect      : num  3.87 0 1.13 0 0 ...

</code>
  </pre>
  <P>
    如果我们真的想用
     <code>
      sapply
    </code>
    ，那就有一个选择
     <code>
      simplify=FALSE
    </code>
     所以它不会强迫
     <code>
      matrix
    </code>
    。
  </p>
</DIV>