- Data Structure
- Networking
- RDBMS
- Operating System
- Java
- MS Excel
- iOS
- HTML
- CSS
- Android
- Python
- C Programming
- C++
- C#
- MongoDB
- MySQL
- Javascript
- PHP
- Physics
- Chemistry
- Biology
- Mathematics
- English
- Economics
- Psychology
- Social Studies
- Fashion Studies
- Legal Studies
- Selected Reading
- UPSC IAS Exams Notes
- Developer's Best Practices
- Questions and Answers
- Effective Resume Writing
- HR Interview Questions
- Computer Glossary
- Who is Who
How to find the table of ordered frequencies of vector elements in R?
We can create table of frequencies of a vector element by using table function and the ordering can be done by using sort function. If we want to order the frequencies in decreasing order then decreasing argument can be used. For example, if we have a vector x then the table of ordered frequencies can be created as sort(table(x)).
Example
x1<-sample(0:9,100,replace=TRUE) x1
Output
[1] 1 4 3 9 8 7 9 5 8 0 6 7 9 0 0 1 5 9 3 0 0 3 7 4 6 8 4 9 3 0 0 2 9 0 2 3 5 [38] 7 8 4 0 7 6 6 0 5 2 2 6 6 0 8 5 2 2 8 3 1 9 4 8 8 4 1 6 4 9 2 4 2 5 0 5 2 [75] 3 2 1 1 8 2 3 6 3 5 3 9 5 9 7 8 2 5 0 6 1 3 4 2 4 5
Example
Table_Ordered_By_Frequency_x1<-sort(table(x1)) Table_Ordered_By_Frequency_x1
Output
x1 7 1 6 4 8 9 3 5 0 2 6 7 9 10 10 10 11 11 13 13
Example
x2<-sample(0:9,200,replace=TRUE) x2
Output
[1] 4 8 6 9 0 1 0 9 4 5 8 6 0 8 2 8 2 8 8 6 9 7 7 7 8 6 1 2 3 8 7 8 6 5 5 6 9 [38] 2 1 1 5 4 3 0 8 2 3 7 5 1 5 8 1 6 1 2 1 2 1 6 8 0 6 0 9 5 8 2 6 8 3 9 6 9 [75] 0 8 7 2 2 6 4 7 4 8 3 6 0 0 3 1 5 1 4 5 6 8 5 4 0 3 2 7 7 6 4 8 8 2 4 3 9 [112] 4 8 0 8 8 6 5 7 9 4 6 2 8 9 2 5 7 8 7 3 5 2 4 4 5 7 8 7 2 2 8 3 7 3 0 4 3 [149] 7 6 0 8 9 3 2 6 1 5 8 9 0 1 8 2 5 8 2 5 0 5 6 5 9 5 0 4 8 9 0 8 3 5 8 1 9 [186] 9 2 5 0 0 3 3 7 3 9 4 8 3 4 7
Example
Table_Ordered_By_Frequency_x2<-sort(table(x2),decreasing=T) Table_Ordered_By_Frequency_x2
Output
x2 8 5 2 6 0 3 7 4 9 1 34 22 21 20 19 18 18 17 17 14
Example
x3<-sample(1:10,200,replace=TRUE) x3
Output
[1] 3 2 1 10 6 4 7 2 7 2 7 9 3 10 9 9 6 10 10 10 5 7 9 1 8 [26] 8 5 10 3 1 10 6 1 2 9 1 9 10 3 4 10 6 7 9 5 6 10 8 10 4 [51] 8 3 1 8 6 8 8 5 7 8 8 8 2 8 5 2 1 5 1 1 1 2 1 6 9 [76] 4 3 8 10 7 10 6 9 7 8 4 10 2 3 8 10 4 4 10 1 2 3 6 9 5 [101] 1 1 4 7 2 6 10 2 7 4 2 5 5 1 2 4 4 5 8 6 3 9 8 3 4 [126] 5 4 7 10 9 7 9 6 5 8 5 9 4 2 1 3 9 6 5 4 6 7 5 6 8 [151] 2 10 9 1 10 1 10 8 4 1 8 4 9 4 7 6 8 2 9 7 3 7 9 2 7 [176] 2 5 2 5 10 2 1 6 2 1 7 7 7 8 9 10 3 4 5 6 7 5 3 9 9
Example
Table_Ordered_By_Frequency_x3<-sort(table(x3),decreasing=T) Table_Ordered_By_Frequency_x3
Output
x3 10 8 9 1 2 7 4 5 6 3 23 22 22 21 21 21 19 19 18 14
Example
x4<-sample(11:99,200,replace=TRUE) x4
Output
[1] 96 78 36 14 69 50 63 36 20 51 84 62 52 52 34 97 85 34 55 54 19 93 20 72 93 [26] 38 76 33 99 28 57 22 20 53 28 66 86 36 17 50 94 78 16 40 47 31 75 30 70 54 [51] 15 86 43 17 39 54 43 99 77 36 33 27 91 94 12 87 80 51 51 76 20 58 50 68 29 [76] 42 98 17 79 49 93 34 28 80 87 71 94 81 90 77 57 16 97 44 49 89 22 11 72 85 [101] 75 89 47 28 90 63 68 21 31 48 85 23 58 84 39 64 77 56 58 45 12 84 27 96 49 [126] 88 62 95 87 26 76 90 48 59 28 88 76 36 46 52 99 55 32 77 34 51 47 77 62 61 [151] 86 75 91 57 64 75 33 91 89 75 17 57 51 58 93 72 99 39 45 54 92 84 46 45 94 [176] 65 35 18 48 80 80 90 76 48 64 55 45 74 58 88 95 24 65 67 96 30 71 48 11 43
Example
Table_Ordered_By_Frequency_x4<-sort(table(x4)) Table_Ordered_By_Frequency_x4
Output
x4 14 15 18 19 21 23 24 26 29 32 35 38 40 42 44 53 56 59 61 66 67 69 70 74 79 81 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 92 98 11 12 16 22 27 30 31 46 63 65 68 71 78 95 97 33 39 43 47 49 50 52 55 62 1 1 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 3 3 3 3 3 3 3 3 3 64 72 85 86 87 88 89 91 96 17 20 34 45 54 57 80 84 90 93 94 99 28 36 48 51 58 3 3 3 3 3 3 3 3 3 4 4 4 4 4 4 4 4 4 4 4 4 5 5 5 5 5 75 76 77 5 5 5
Example
x5<-rpois(200,10) x5
Output
[1] 8 8 10 7 9 13 11 12 8 13 12 12 6 9 11 10 9 11 13 6 7 9 5 12 6 [26] 12 2 8 19 11 14 8 9 5 10 8 9 7 7 8 9 9 7 9 6 13 10 10 3 7 [51] 12 8 10 6 7 8 15 12 5 14 8 8 11 9 8 9 11 6 6 8 6 14 13 5 9 [76] 12 17 11 9 8 8 12 11 8 4 9 15 8 9 11 13 12 10 9 9 9 13 13 12 15 [101] 9 5 12 11 8 10 8 9 14 8 12 7 12 6 14 7 12 13 15 7 10 12 9 8 11 [126] 10 13 6 9 14 11 4 13 15 18 8 12 12 13 11 13 9 7 8 10 13 6 11 9 7 [151] 6 6 8 12 8 11 15 15 11 16 10 12 6 8 8 18 9 8 12 14 14 9 9 10 14 [176] 12 9 11 12 10 7 5 9 5 13 8 10 10 8 9 9 13 14 12 5 15 10 22 10 14
Example
Table_Ordered_By_Frequency_x5<-sort(table(x5),decreasing=T) Table_Ordered_By_Frequency_x5
Output
x5 9 8 12 10 11 13 6 7 14 5 15 4 18 2 3 16 17 19 22 31 30 24 18 17 16 14 13 11 8 8 2 2 1 1 1 1 1 1
Example
x6<-round(rnorm(200),0) x6
Output
[1] -2 -1 -1 0 0 1 -1 -1 1 1 1 1 1 0 -1 0 0 0 -1 -1 -2 1 2 -1 -1 [26] -1 0 -2 0 0 0 -1 -1 0 0 -1 0 -2 1 -1 0 0 2 -1 -1 -1 -1 -1 0 1 [51] 1 1 0 1 -2 0 -1 1 0 1 0 1 0 -1 1 -1 -1 -2 1 -1 2 1 1 1 0 [76] 1 -1 1 0 0 1 1 1 1 -2 -3 0 -1 0 1 -1 1 0 1 0 0 0 0 1 1 [101] -1 -1 1 0 -1 -2 2 0 -1 0 0 -2 1 1 0 -1 2 1 0 0 -1 -1 -1 0 0 [126] -1 0 2 -1 0 0 0 0 -1 0 -1 0 0 0 1 1 0 1 -1 0 -2 1 0 -2 -1 [151] -1 0 -1 0 -1 1 1 0 1 0 0 -1 0 1 -1 1 0 1 0 -1 0 1 -2 0 1 [176] 0 0 1 -1 -1 0 -1 0 -1 1 0 0 2 -2 -1 -2 -1 -1 0 1 2 -2 0 2 -2
Example
Table_Ordered_By_Frequency_x6<-sort(table(x6)) Table_Ordered_By_Frequency_x6
Output
x6 -3 2 -2 1 -1 0 1 9 16 50 54 70
Advertisements