Re: [R] Question about ggplot2 symbol and legend change

2016-10-11 Thread Thierry Onkelinx
Dear Luis,

Please don't post in HTML, it mangles the code.

You want something like

p + scale_shape_manual(values = c(16, 2))

Untested as you failed to provide a reproducible example.

Best regards,

ir. Thierry Onkelinx
Instituut voor natuur- en bosonderzoek / Research Institute for Nature and
Forest
team Biometrie & Kwaliteitszorg / team Biometrics & Quality Assurance
Kliniekstraat 25
1070 Anderlecht
Belgium

To call in the statistician after the experiment is done may be no more
than asking him to perform a post-mortem examination: he may be able to say
what the experiment died of. ~ Sir Ronald Aylmer Fisher
The plural of anecdote is not data. ~ Roger Brinner
The combination of some data and an aching desire for an answer does not
ensure that a reasonable answer can be extracted from a given body of data.
~ John Tukey

2016-10-11 4:25 GMT+02:00 Luis Fernando García :

> Dear R experts,
>
> Maybe my question is too basic and I apologize for that. I am having an
> issue currently by trying to change manually the symbols of the series. I
> need to put them manually, instead of using the symbols that R gives by
> default and produce a plot with the classic style. For example I need to
> put the symbols 16 and 2, but I have been unable to do it so far. Also, I
> need to remove the grey background from the seiries but I have been unable
> to do it too.
>
> Any help you can provide will be really helpful.
>
> Below, I am providing the script as well as the picture I gio with it If
> necessary I added the dataset.
>
> Many thanks
>
>
> 
> #
>
>
> it<-read.table("immotime.txt",header=TRUE)
> it
> str(it)
> names(it)
> fit3<-lm(Time ~ Sp*Ratio, data=it)
> anova(fit3)
> plot(fit3)
> summary(fit3)
> a$lPeso <- log(Peso)
> library(ggplot2)
> p <- ggplot(it,aes(x=Ratio,y=Time)) + geom_point(aes(shape=factor(Sp)))
> p=p + geom_smooth(aes(linetype=factor(Sp), ),colour="black", method='lm',
> se=F)+theme(panel.grid.major = element_blank(), panel.grid.minor =
> element_blank(),
>   panel.background = element_blank(), axis.line =
> element_line(colour = "black"))
> p
>
>
>
> 
> #
>
> Plot: https://postimg.org/image/3vm2uleip/
> dataset "it" http://textuploader.com/d593h
>
> [[alternative HTML version deleted]]
>
> __
> R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see
> 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 -- To UNSUBSCRIBE and more, see
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] Question about ggplot2 symbol and legend change

2016-10-10 Thread Luis Fernando García
Dear R experts,

Maybe my question is too basic and I apologize for that. I am having an
issue currently by trying to change manually the symbols of the series. I
need to put them manually, instead of using the symbols that R gives by
default and produce a plot with the classic style. For example I need to
put the symbols 16 and 2, but I have been unable to do it so far. Also, I
need to remove the grey background from the seiries but I have been unable
to do it too.

Any help you can provide will be really helpful.

Below, I am providing the script as well as the picture I gio with it If
necessary I added the dataset.

Many thanks


#


it<-read.table("immotime.txt",header=TRUE)
it
str(it)
names(it)
fit3<-lm(Time ~ Sp*Ratio, data=it)
anova(fit3)
plot(fit3)
summary(fit3)
a$lPeso <- log(Peso)
library(ggplot2)
p <- ggplot(it,aes(x=Ratio,y=Time)) + geom_point(aes(shape=factor(Sp)))
p=p + geom_smooth(aes(linetype=factor(Sp), ),colour="black", method='lm',
se=F)+theme(panel.grid.major = element_blank(), panel.grid.minor =
element_blank(),
  panel.background = element_blank(), axis.line =
element_line(colour = "black"))
p



#

Plot: https://postimg.org/image/3vm2uleip/
dataset "it" http://textuploader.com/d593h

[[alternative HTML version deleted]]

__
R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see
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.