我在R中有以下数据框,包含274569行和15列:
> str(x2)
'data.frame': 274569 obs. of 15 variables:
$ ykod : int 99 99 99 99 99 99 99 99 99 99 ...
$ yad : Factor w/ 43 levels "BAKUGAN","BARBIE",..: 2 2 2 2 2 2 2 2 2 2 ...
$ per : Factor w/ 3 levels "2 AYLIK","3 AYLIK",..: 3 3 3 3 3 3 3 3 3 3 ...
$ donem: int 201106 201106 201106 201106 201106 201106 201106 201106 201106 201106 ...
$ sayi : int 201106 201106 201106 201106 201106 201106 201106 201106 201106 201106 ...
$ mkod : int 359 361 362 363 366 847 849 850 1505 1506 ...
$ mad : Factor w/ 11045 levels " Hilal Gida ",..: 5163 3833 10840 8284 10839 2633 10758 10293 6986 6984 ...
$ mtip : Factor w/ 30 levels "Abone Bürosu ",..: 20 20 20 20 20 2 2 2 11 11 ...
$ kanal: Factor w/ 2 levels "OB","SS": 2 2 2 2 2 2 2 2 1 1 ...
$ bkod : int 110006 110006 110006 110006 110006 110006 110006 110006 110006 110006 ...
$ bad : Factor w/ 213 levels "4. Levent","500 Evler",..: 25 25 25 25 25 25 25 25 25 25 ...
$ bolge: Factor w/ 12 levels "Adana ?ehiriçi",..: 7 7 7 7 7 7 7 7 7 7 ...
$ sevk : int 5 2 2 2 10 0 4 3 13 32 ...
$ iade : int 0 2 1 2 4 0 3 2 0 8 ...
$ satis: int 5 0 1 0 6 0 1 1 13 24 ...
Run Code Online (Sandbox Code Playgroud)
我创建一个子矩阵并显示其结构:
> msub <- x2[x2$ykod == 99,]
> str(msub)
'data.frame': 14367 obs. of 15 variables:
$ ykod : int 99 99 99 99 99 99 99 99 99 99 ...
$ yad : Factor w/ 43 levels "BAKUGAN","BARBIE",..: 2 2 2 2 2 2 2 2 2 2 ...
$ per : Factor w/ 3 levels "2 AYLIK","3 AYLIK",..: 3 3 3 3 3 3 3 3 3 3 ...
$ donem: int 201106 201106 201106 201106 201106 201106 201106 201106 201106 201106 ...
$ sayi : int 201106 201106 201106 201106 201106 201106 201106 201106 201106 201106 ...
$ mkod : int 359 361 362 363 366 847 849 850 1505 1506 ...
$ mad : Factor w/ 11045 levels " Hilal Gida ",..: 5163 3833 10840 8284 10839 2633 10758 10293 6986 6984 ...
$ mtip : Factor w/ 30 levels "Abone Bürosu ",..: 20 20 20 20 20 2 2 2 11 11 ...
$ kanal: Factor w/ 2 levels "OB","SS": 2 2 2 2 2 2 2 2 1 1 ...
$ bkod : int 110006 110006 110006 110006 110006 110006 110006 110006 110006 110006 ...
$ bad : Factor w/ 213 levels "4. Levent","500 Evler",..: 25 25 25 25 25 25 25 25 25 25 ...
$ bolge: Factor w/ 12 levels "Adana ?ehiriçi",..: 7 7 7 7 7 7 7 7 7 7 ...
$ sevk : int 5 2 2 2 10 0 4 3 13 32 ...
$ iade : int 0 2 1 2 4 0 3 2 0 8 ...
$ satis: int 5 0 1 0 6 0 1 1 13 24 ...
Run Code Online (Sandbox Code Playgroud)
现在我有一个14367行和15列的子矩阵,但因子的水平仍然存在.他们本应该减少.例如,因为yad,应该只有一个因素.
如何轻松地使str()显示因子水平的正确信息,以便在我输入str(msub)时给出正确的值?
事实上,str它向您展示了正确的结构信息:该因子具有显示水平的能力.想象一下,连接两个子矩阵,其中一个包含一些级别,另一个包含另一个级别:合并它有点麻烦!这只是因素在R中的作用.
如果您想知道数据中存在哪些因素,则其中一个选项table用于计算事件的数量.
如果您希望减少因子,那么它只包含实际存在的级别,您可以重新应用它的因子:
myfact<-factor(rep(1:2,5), levels=1:3, labels=letters[1:3])
myfact
# [1] a b a b a b a b a b
#Levels: a b c
factor(myfact)
# [1] a b a b a b a b a b
#Levels: a b
Run Code Online (Sandbox Code Playgroud)
您可以将其应用于data.frame的所有因子列,以获得您想要的内容.