Hi,
One way could be
with(base, tapply(r, list(p, q), sum))
HTH,
Jorge.-
On Sat, Dec 1, 2012 at 11:37 PM, CE.KA <> wrote:
> Hi R users
>
> Imagine the table "base":
> p=c("d","d","b","b","a","a")
> q=c("v1","v2","v1","v2","v1","v2")
> r=c(5,2,4,8,9,7)
> base=data.frame(p,q,r)
> base
>
> p q r
> 1 d v1 5
> 2 d v2 2
> 3 b v1 4
> 4 b v2 8
> 5 a v1 9
> 6 a v2 7
>
> How programming R to get this result:
>
> v1 v2
> a 9 7
> b 4 8
> d 5 2
>
> I tried the function table but the result is divided in several matrix:
> table(base$p,base$q,base$r)
> , , = 2
>
>
> v1 v2
> a 0 0
> b 0 0
> d 0 1
>
> , , = 4
>
>
> v1 v2
> a 0 0
> b 1 0
> d 0 0
>
> , , = 5
>
>
> v1 v2
> a 0 0
> b 0 0
> d 1 0
>
> , , = 7
>
>
> v1 v2
> a 0 1
> b 0 0
> d 0 0
>
> , , = 8
>
>
> v1 v2
> a 0 0
> b 0 1
> d 0 0
>
> , , = 9
>
>
> v1 v2
> a 1 0
> b 0 0
> d 0 0
>
> SIncerely yours
>
>
>
> --
> View this message in context:
> http://r.789695.n4.nabble.com/How-to-built-a-pivot-table-of-value-tp4651539.html
> Sent from the R help mailing list archive at Nabble.com.
>
> ______________________________________________
> R-help@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.
>
[[alternative HTML version deleted]]
______________________________________________
R-help@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.
