[R] A matrix with mixed character and numerical columns
michael watson (IAH-C)
michael.watson at bbsrc.ac.uk
Thu May 31 14:32:01 CEST 2007
What I am trying to do is create an x-y plot from the numerical values,
and the output of row() or col() gives me an excellent way of
calculating an x- or y- co-ordinate, with the value in the data.frame
being the other half of the pair.
Thanks for the code, Petr - I'm sure you would agree, however, that it's
a bit 'clumsy' (no fault of yours).
Can we just adjust row() and col() for data.frames?
col <- function (x, as.factor = FALSE)
{
if (is.data.frame(x)) {
x <- as.matrix(x)
}
if (as.factor)
factor(.Internal(col(x)), labels = colnames(x))
else .Internal(col(x))
}
row <- function (x, as.factor = FALSE)
{
if (is.data.frame(x)) {
x <- as.matrix(x)
}
if (as.factor)
factor(.Internal(row(x)), labels = rownames(x))
else .Internal(row(x))
}
Is there any reason why these won't work? Am I oversimplifying it?
Mick
-----Original Message-----
From: Petr PIKAL [mailto:petr.pikal at precheza.cz]
Sent: 31 May 2007 12:57
To: michael watson (IAH-C)
Cc: r-help at stat.math.ethz.ch
Subject: Odp: [R] A matrix with mixed character and numerical columns
Hi
r-help-bounces at stat.math.ethz.ch napsal dne 31.05.2007 12:48:11:
> Is it possible to have one?
>
> I have a data.frame with two character columns and 6 numerical
columns.
>
> I converted to a matrix as I needed to use the col() and row()
> functions.
> However, if I convert the data.frame to a matrix, using as.matrix, the
> numerical columns get converted to characters, and that messes up some
> of the calculations.
>
> Do I really have to split it up into two matrices, one character and
the
> other numerical, just so I can use the col() and row() functions? Are
> there equivalent functions for data.frames?
AFAIK I do not remember equivalent functions for data frame. If you just
want column or row index you can use
1:dim(DF)[1] or 1:dim(DF)[2] for rows and columns
if you want repeat these indexes row or columnwise use
rrr<-rep(1:dim(DF)[1], dim(DF)[2])
matrix(rrr,dim(DF)[1], dim(DF)[2])
rrr<-rep(1:dim(DF)[2], dim(DF)[1])
matrix(rrr,dim(DF)[1], dim(DF)[2], byrow=T)
Regards
Petr
>
> ______________________________________________
> R-help at stat.math.ethz.ch 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.
More information about the R-help
mailing list