[R] c weirdness

[William Dunlap]

Or use [[ instead of [ (assuming you are only selecting one item)

> tab <- table(c(16,16,17,17,17))
> c(n=1, seed=tab[2])
      n seed.17
      1       3
> c(n=1, seed=unname(tab[2]))
   n seed
   1    3
> c(n=1, seed=tab[[2]])
   n seed
   1    3
> c(n=1, seed=tab[["17"]])
   n seed
   1    3

Bill Dunlap
Spotfire, TIBCO Software
wdunlap tibco.com


> -----Original Message-----
> From: William Dunlap
> Sent: Wednesday, November 07, 2012 1:24 PM
> To: 'sds at gnu.org'; r-help at r-project.org
> Subject: RE: [R] c weirdness
> 
> Your example doesn't work here - you didn't show what 'tab' was.
> Perhaps it was an output of table:
> 
> > tab <- table(c(16,16,17,17,17))
> > c(n=1, seed=tab[2])
>       n seed.17
>       1       3
> > c(n=1, seed=unname(tab[2]))
>    n seed
>    1    3
> 
> Bill Dunlap
> Spotfire, TIBCO Software
> wdunlap tibco.com
> 
> 
> > -----Original Message-----
> > From: r-help-bounces at r-project.org [mailto:r-help-bounces at r-project.org] On Behalf
> > Of Sam Steingold
> > Sent: Wednesday, November 07, 2012 12:53 PM
> > To: r-help at r-project.org
> > Subject: [R] c weirdness
> >
> > is there a way to avoid c() appending ".0" and ".1" to seed?
> > --8<---------------cut here---------------start------------->8---
> > > c("nons"=1, "seed"=3)
> > nons seed                       ## good!
> >    1    3
> > > c("nons"=1, "seed"=tab[1])
> >    nons  seed.0                 ## don't want ".0"!
> >       1 2344600
> > > c("nons"=1, "seed"=tab[2])
> >   nons seed.1                   ## don't want ".1"!
> >      1   6843
> > > tab
> >       0       1
> > 2344600    6843
> > --8<---------------cut here---------------end--------------->8---
> >
> > --
> > Sam Steingold (http://sds.podval.org/) on Ubuntu 12.04 (precise) X 11.0.11103000
> > http://www.childpsy.net/ http://pmw.org.il
> > http://memri.org http://ffii.org http://openvotingconsortium.org
> > Islam is a religion of Peace. Its adherents will kill anyone who disagrees.
> >
> > ______________________________________________
> > 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.