[R] Pivot Table "like" structure

[arun]

Hi,

Not very clear whether this is you want.
#dat1 -data
aggregate(cbind(dat1$State,dat1$Coutry,dat1$City),list(dat1$Char1,dat1$Char2,dat1$Char3),length)
#or
 ddply(dat1,.(Char1,Char2,Char3),colwise(length,c("State","Coutry","City")))
#  Char1 Char2  Char3 State Coutry City
#1     A  ABCD  ASDFG     1      1    1
#2     A  ABCD  DDDDD     1      1    1
#3     B  EFGH  ASDFG     1      1    1
#4     B  GGGG  ASDFG     1      1    1
#5     C  EFGH EEEEEE     1      1    1
#6     C  GGGG  DDDDD     1      1    1
#7     D  FGHJ  ASDFG     1      1    1
#8     M  EFGH EEEEEE     1      1    1
A.K.




----- Original Message -----
From: Bhupendrasinh Thakre <vickythakre at gmail.com>
To: "r-help at r-project.org help" <r-help at r-project.org>
Cc: 
Sent: Saturday, October 13, 2012 8:38 PM
Subject: [R] Pivot Table "like" structure

HI Team,

I am currently working on problem and stumped on "for" loop.

Data:

structure(list(Coutry = structure(c(3L, 3L, 3L, 3L, 2L, 2L, 1L, 
1L), .Label = c("J", "M", "U"), class = "factor"), State = structure(c(1L, 
1L, 4L, 2L, 5L, 5L, 3L, 6L), .Label = c("A", "C", "K", "O", "S", 
"T"), class = "factor"), City = structure(c(1L, 8L, 7L, 2L, 3L, 
6L, 5L, 4L), .Label = c("BEN", "HRD", "JKL", "KK", "KL", "KMM", 
"OKC", "TYU"), class = "factor"), Char1 = structure(c(1L, 2L, 
1L, 3L, 4L, 2L, 3L, 5L), .Label = c("A", "B", "C", "D", "M"), class = "factor"), 
    Char2 = structure(c(1L, 2L, 1L, 2L, 3L, 4L, 4L, 2L), .Label = c("ABCD", 
    "EFGH", "FGHJ", "GGGG"), class = "factor"), Char3 = structure(c(1L, 
    1L, 2L, 3L, 1L, 1L, 2L, 3L), .Label = c("ASDFG", "DDDDD", 
    "EEEEEE"), class = "factor")), .Names = c("Coutry", "State", 
"City", "Char1", "Char2", "Char3"), row.names = c(NA, -8L), class = "data.frame")

Question:

I am trying to create a pivot table which will count the occurrences of Char1 : Char4
from the columns Coutry, State, City. I am not sure to use all the four columns and get something like

structure(list(Group.1 = structure(1:4, .Label = c("ABCD", "EFGH", 
"FGHJ", "GGGG"), class = "factor"), x = c(2L, 3L, 1L, 2L)), .Names = c("Group.1", 
"x"), row.names = c(NA, -4L), class = "data.frame")

Code which I tried to use with not best results:

aggregate(State, list(Char2), FUN="count")


Best Regards,


Bhupendrasinh Thakre





    [[alternative HTML version deleted]]

______________________________________________
R-help at r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.