怎么在R語言中將因子轉(zhuǎn)換成字符串

這篇文章將為大家詳細講解有關怎么在R語言中將因子轉(zhuǎn)換成字符串，文章內(nèi)容質(zhì)量較高，因此小編分享給大家做個參考，希望大家閱讀完這篇文章后對相關知識有一定的了解。

示例數(shù)據(jù)如下：

name,math,english,sex,year
"yiifaa",65,68,"M",2018
"yiifee",95,98,"F",2018
"guagua",75,78,"M",2018
"MM",85,88,"F",2018

查看數(shù)據(jù)概要，發(fā)現(xiàn)默認將字符串轉(zhuǎn)換為因子，并進行了分組計數(shù)(這也是處理速度較慢的原因之一)

概要如下：

  name        math         english     sex        year     
 guagua:1   Min.   :65.0   Min.   :68.0   F:2   Min.   :2018  
 MM    :1   1st Qu.:72.5   1st Qu.:75.5   M:2   1st Qu.:2018  
 yiifaa:1   Median :80.0   Median :83.0         Median :2018  
 yiifee:1   Mean   :80.0   Mean   :83.0         Mean   :2018  
            3rd Qu.:87.5   3rd Qu.:90.5         3rd Qu.:2018  
            Max.   :95.0   Max.   :98.0         Max.   :2018

但這樣的分組計數(shù)并沒有意義，所以需要利用“as.character”轉(zhuǎn)換為字符，如下：

#! /usr/bin/env RScript
setwd("D:/Workspace/R-Works/R-Stat")
scores <- read.table("Score.txt", header = TRUE, sep = ",", quote="\"", encoding = "UTF-8", stringsAsFactors = TRUE)
# 將因子轉(zhuǎn)換為字符
scores$name <- as.character(scores$name)
# 多轉(zhuǎn)一個進行測試
scores$sex <- as.character(scores$sex)

再次查看概要，如下：

name                math         english         sex                 year     
 Length:4           Min.   :65.0   Min.   :68.0   Length:4           Min.   :2018  
 Class :character   1st Qu.:72.5   1st Qu.:75.5   Class :character   1st Qu.:2018  
 Mode  :character   Median :80.0   Median :83.0   Mode  :character   Median :2018  
                    Mean   :80.0   Mean   :83.0                      Mean   :2018  
                    3rd Qu.:87.5   3rd Qu.:90.5                      3rd Qu.:2018  
                    Max.   :95.0   Max.   :98.0                      Max.   :2018

可以看到，概要中已經(jīng)沒有了分組計數(shù)，但多了總數(shù)計量，如果要恢復分組計數(shù)，則需要重新創(chuàng)建因子，如下：

scores$sex <- factor(scores$sex, levels=c("M", "F"), ordered = TRUE)

結論

在導入大批量數(shù)據(jù)時，為了提高性能，盡可能分兩步走：

1. 顯式指定“stringsAsFactors = FALSE”；

2. 依次將所需要的數(shù)據(jù)列(向量)轉(zhuǎn)換為因子；

補充：R語言：變量名稱和字符串的轉(zhuǎn)換

在R語言中，經(jīng)常會遇到變量名稱和字符串相互轉(zhuǎn)換的問題。

比如說，進行1000次循環(huán)運算，并將運算結果存儲在1000個變量中，如x_1, x_2, ... , x_1000。這時候可以使用assign()函數(shù)，示例如下：

> a
錯誤: 找不到對象'a'
> assign('a', 1)
> a
[1] 1

上面的例子將字符'a'轉(zhuǎn)變?yōu)樽兞縜，并將其賦值為1 。

相反，如果我們想遍歷一個變量序列，并對其中的每一個變量都進行操作，該怎么辦呢？我們可以使用get()函數(shù)。示例如下：

> a <- 1
> b <- 2
> c <- 3
> sequence <- c('a', 'b', 'c')
> for (var in sequence){print(var + 10)}

錯誤于var + 10 : 二進列運算符中有非數(shù)值參數(shù)

> for (var in sequence){print(get(var) + 10)}
[1] 11
[1] 12
[1] 13

關于怎么在R語言中將因子轉(zhuǎn)換成字符串就分享到這里了，希望以上內(nèi)容可以對大家有一定的幫助，可以學到更多知識。如果覺得文章不錯，可以把它分享出去讓更多的人看到。