資料結構
網路
關係型資料庫管理系統
作業系統
Java
MS Excel
iOS
HTML
CSS
Android
Python
C 語言程式設計
C++
C#
MongoDB
MySQL
Javascript
PHP
物理學
化學
生物學
數學
英語
經濟學
心理學
社會學
時尚研究
法律研究如何在 R 中查詢向量中重複值和唯一值的頻率？
如果我們在 R 中的向量中找到唯一值，並且它們是重複的，那麼我們可以找到這些唯一值的頻率，這將幫助我們瞭解向量中值的分佈。基於這種分佈分析，我們可以進行進一步的分析。這可以透過 rle 函式來完成。
示例
x1<-sample(0:2,20,replace=TRUE) x1
輸出
[1] 1 0 1 2 0 2 1 0 1 1 0 2 0 0 1 0 2 0 2 2
示例
with(rle(x1),table(lengths[values==1]))
輸出
1 2 4 1
示例
x2<-sample(0:2,140,replace=TRUE) x2
輸出
[1] 0 2 2 2 2 0 2 1 1 2 1 1 0 1 2 2 1 0 1 1 0 2 0 2 2 0 2 1 1 1 0 0 0 1 1 0 1 [38] 0 0 1 1 0 2 2 2 0 1 1 0 1 0 1 0 1 2 2 0 1 2 0 2 2 1 1 0 2 1 2 1 2 2 1 2 1 [75] 0 0 1 1 1 2 2 1 1 2 1 2 1 0 2 0 0 0 1 2 2 2 1 0 2 2 1 1 0 2 1 2 2 1 0 0 1 [112] 0 2 1 0 2 0 2 1 2 0 1 1 2 1 1 1 0 2 1 2 0 2 2 2 0 1 1 2 0
示例
with(rle(x2),table(lengths[values==1]))
輸出
1 2 3 21 11 3
示例
x3<-sample(0:5,140,replace=TRUE) x3
輸出
[1] 2 2 3 1 2 5 4 4 2 1 1 2 3 0 1 3 4 1 2 0 4 1 2 0 1 0 2 4 5 2 0 0 4 4 0 1 1 [38] 5 1 5 4 4 5 4 3 3 0 5 5 5 0 2 3 3 3 4 4 1 2 1 2 4 4 0 0 2 0 2 1 5 0 3 2 4 [75] 1 5 5 5 0 0 1 3 1 1 4 2 3 3 3 0 2 3 0 0 3 5 5 1 1 1 5 3 5 0 0 3 1 3 2 5 2 [112] 0 4 5 5 0 1 3 4 3 5 0 3 5 0 5 1 0 3 4 4 5 3 5 0 0 4 1 3 1
示例
with(rle(x3),table(lengths[values==1]))
輸出
1 2 3 16 3 1
示例
with(rle(x3),table(lengths[values==2]))
輸出
1 2 17 1
示例
with(rle(x3),table(lengths[values==3]))
輸出
1 2 3 16 1 2
示例
with(rle(x3),table(lengths[values==4]))
輸出
1 2 9 6
示例
with(rle(x3),table(lengths[values==5]))
輸出
1 2 3 14 2 2
示例
with(rle(x3),table(lengths[values==0]))
輸出
1 2 15 6
示例
x4<-sample(1:10,150,replace=TRUE) x4
輸出
[1] 9 6 2 2 3 8 7 3 2 6 10 8 5 4 1 5 8 10 7 7 4 3 8 1 7 [26] 4 10 6 9 7 6 4 3 1 5 2 10 1 8 8 7 3 1 4 1 7 8 5 2 1 [51] 6 2 6 9 1 9 1 9 9 4 8 6 10 5 2 5 10 7 8 7 9 6 8 3 3 [76] 7 10 1 2 4 5 6 10 2 3 1 8 4 4 6 1 2 8 1 8 8 6 6 5 8 [101] 6 8 6 4 6 4 2 7 5 8 7 1 7 10 1 8 3 2 1 7 1 5 10 5 9 [126] 5 6 2 8 4 7 9 5 6 8 8 5 1 1 5 8 1 4 10 6 8 6 1 10 6
示例
with(rle(x4),table(lengths[values==1]))
輸出
1 2 19 1
示例
with(rle(x4),table(lengths[values==2]))
輸出
1 2 11 1
示例
with(rle(x4),table(lengths[values==3]))
輸出
1 2 7 1
示例
with(rle(x4),table(lengths[values==4]))
輸出
1 2 11 1
示例
with(rle(x4),table(lengths[values==5]))
輸出
1 15
示例
with(rle(x4),table(lengths[values==6]))
輸出
1 2 18 1
示例
with(rle(x4),table(lengths[values==7]))
輸出
1 2 13 1
示例
with(rle(x4),table(lengths[values==8]))
輸出
1 2 17 3
示例
with(rle(x4),table(lengths[values==9]))
輸出
1 2 7 1
示例
with(rle(x4),table(lengths[values==10]))
輸出
1 12
示例
x5<-sample(1001:1005,120,replace=TRUE) x5
輸出
[1] 1004 1004 1005 1001 1001 1002 1004 1001 1001 1004 1004 1002 1005 1003 1002 [16] 1004 1004 1004 1005 1005 1004 1003 1003 1005 1001 1005 1003 1004 1003 1003 [31] 1005 1004 1001 1002 1002 1004 1003 1002 1003 1004 1001 1001 1005 1001 1001 [46] 1001 1003 1002 1004 1004 1002 1002 1002 1002 1002 1005 1005 1001 1004 1004 [61] 1004 1001 1003 1004 1001 1002 1004 1005 1004 1002 1004 1003 1003 1001 1002 [76] 1002 1003 1001 1002 1001 1002 1001 1005 1005 1003 1003 1002 1004 1002 1004 [91] 1001 1005 1005 1005 1002 1004 1005 1001 1002 1003 1002 1004 1002 1002 1005 [106] 1005 1005 1005 1003 1004 1004 1005 1001 1002 1003 1004 1005 1003 1002 1004
示例
with(rle(x5),table(lengths[values==1001]))
輸出
1 2 3 12 3 1
示例
with(rle(x5),table(lengths[values==1002]))
輸出
1 2 5 16 3 1
示例
with(rle(x5),table(lengths[values==1003]))
輸出
1 2 11 4
示例
with(rle(x5),table(lengths[values==1004]))
輸出
1 2 3 16 4 2
示例
with(rle(x5),table(lengths[values==1005]))
輸出
1 2 3 4 10 3 1 1
更新於: 2020-10-17
267 次瀏覽
廣告