Hi:
Typically a profile plot is a plot over time for each of n subjects
(aka a 'spaghetti plot'). Here's a revision of your code to yield a
profile plot in ggplot2, although it's not clear for what the grouping
variable is meant.
sampledata= matrix(c(1.002, 1.76, 0.67, 0.99, 1.38, 1.0, 0.5, 0.78,
1.003,0.57, 0.99, 0.58, 0.76, 1.23,
1.45, .78,
1.43, 1.34, 1.0, 0.9), ncol = 5,
dimnames = list(c("cond1", "cond2",
"cond3", "cond4"),
c("col1",
"col2", "col3", "col4", "col5")))
sdata <- melt(sampledata) # melt method for matrices
sdata$grp <- factor(c('grp1', 'grp1', 'grp2', 'grp3'))
sdata$time <- rep(1:5, each = 4)
library(ggplot2)
h <- ggplot(sdata, aes(time, value))
h + geom_point(aes(colour = cond), size = 2.5) +
geom_line(aes(colour = cond), size = 1)
Hope this is enough to get you started...
Dennis
On Mon, Jun 20, 2011 at 5:20 AM, Vickie S <is...@live.com> wrote:
>
> Hi thanks for the help.
>
> Here is the error message i got. I could not figure out what goes wrong here.
>
> ======
> require(ggplots2)
> sampledata=data.frame(c(1.002, 1.76, 0.67, 0.99), c(1.38,1.0,0.5, 0.78),
> c(1.003,0.57,0.99, 0.58),c(0.76,1.23, 1.45, .78), c(1.43, 1.34, 1.0, 0.9))
> rownames(sampledata)=c("cond1", "cond2", "cond3", "cond4")
> colnames(sampledata)=c("col1", "col2", "col3", "col4", "col5")
> grp=c("grp1", "grp1", "grp2", "grp3")
> sampledata=cbind(sampledata, grp)
> long.dat=melt(sampledata[,1:5], idvars=as.character(rownames(sampledata)),
> measure.vars=as.character(colnames(sampledata)[1:5]), variable_name="cols")
>
> ggplot(long.dat, aes(x = cols, y = value)) +
> + geom_line(aes(colour = sampledata$grp)) +
> + facet_grid(~ rownames(sampledata))
> Error in get("make_aesthetics", env = x, inherits = TRUE)(x, ...) :
> could not find function "empty"
>
> =====
>
>
> thanks again,
> Vickie S
>
> ----------------------------------------
>> CC: r-help@r-project.org
>> From: jwiley.ps...@gmail.com
>> Subject: Re: [R] profile plot in R
>> Date: Sat, 18 Jun 2011 08:24:01 -0700
>> To: is...@live.com
>>
>> Hi,
>>
>> Another easy option would be to convert your data to "long" format and then
>> use ggplot2 or lattice. Something like (though not exact without a
>> reproducible example):
>>
>> require(ggplot2)
>> long.dat <- melt(your_data, arguments)
>>
>> ggplot(long.dat, aes(x = variable, y = value)) +
>> geom_line(aes(colour = group)) +
>> facet_grid(~ condition)
>>
>> HTH,
>>
>> Josh
>>
>> On Jun 17, 2011, at 12:43, Vickie S <is...@live.com> wrote:
>>
>> >
>> > Hi friends,
>> >
>> > I have a matrix with following format.
>> >
>> > group var1 var2 .......varN
>> >
>> > c1 group1 1.2399 1.4990....-1.4829
>> >
>> > c2 group4 0.8989 0.7849.....1.8933
>> >
>> > ...
>> >
>> > ...
>> >
>> > c100 group10 .....
>> >
>> >
>> >
>> > I want to draw a profile plot
>> > of each condition c1 to c100, which rows in above matrix and each line
>> > representing a row should be uniquely colored according to the group(1
>> > to 10).
>> >
>> > I think this is simple task but I could not figure out how to set the
>> > colors.
>> >
>> >
>> >
>> > Any help would be appreciated.
>> >
>> >
>> >
>> > thanks
>> >
>> > -Vickie
>> > [[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.
>
> ______________________________________________
> 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.
>
______________________________________________
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.
