Hi, everyone, Before everything, thanks. Lots of thanks ;)!!!!
I don’t think you understood everything I need to do. I want to write t_i instead of "Day in ICU” [i subscript for t] and y_ij instead of "CRP (mg/dL)” [ij superscript for y]. The label of the axis… :( Can you help me on that task? Thanks!!!!! Best, Rosa Oliveira > On 31 Jul 2017, at 10:28, Martin Maechler <maech...@stat.math.ethz.ch> wrote: > >>>>>> PIKAL Petr <petr.pi...@precheza.cz <mailto:petr.pi...@precheza.cz>> >>>>>> on Mon, 31 Jul 2017 09:11:18 +0000 writes: > >> Hi Martin see in line > >>> -----Original Message----- From: Martin Maechler >>> [mailto:maech...@stat.math.ethz.ch] Sent: Monday, July >>> 31, 2017 10:52 AM To: PIKAL Petr <petr.pi...@precheza.cz> >>> Cc: Rosa Oliveira <rosit...@gmail.com>; r-help mailing >>> list <r-help@r- > project.org> >>> Subject: Re: [R] Superscript and subscrib R for legend >>> x-axis and y-axis and colour different subjects in >>> longitudinal data with different colours >>> >>> >>>> Hi Rosa > something like >>> >>>> plot(1,1, sub=expression(lambda^"2")) >>> >>>> So with your example, do you want something like >>> >>>> plot(c(1:5), CRP7raw[1,], type = "n", xlim=c(1,5), >>> ylim=c(-10,5) , > xlab="Day in ICU", > ylab="CRP >>> (mg/dL)", > sub = mtext(expression(lambda^2))) >>> >>> OOps! Either plot( ..., sub = *) or plot( ... ) ; >>> mtext(*) >>> >>> but not both! > >> You are right, I used a code from OP and did not much >> think about it. Strangely enough, the code worked without >> any complain. Probably mtext is "stronger" than sub and >> overrides it. > > Well, well, "the magic of R" ..... > Not quite: mtext(..) is a valid function call that is evaluated > before plot() finishes; then it returns NULL invisibly, and > 'plot(*, sub=NULL)' does nothing "coincidentally" (but for good > reasons) > > Martin > >> Cheers Petr > >>> >>>> CRP7graph <- apply(CRP7, 1, lines, col="gray") >>> >>>> Cheers > Petr >>> >>> >>>>> -----Original Message----- > > From: R-help >>> [mailto:r-help-boun...@r-project.org] On Behalf Of Rosa > >>>> Oliveira > > Sent: Friday, July 28, 2017 5:07 PM > > >>> To: r-help mailing list <r-help@r-project.org>; >>> R-help@r-project.org > > Subject: [R] Superscript and >>> subscrib R for legend x-axis and y-axis > > and colour >>> different subjects in longitudinal data with different > >>>> colours >>>>> >>>>> I am trying to make a x-axis and y-axis titles with >>> both a special > > character and a subscript. I am not >>> being able to do this. I think > > its just a placing of >>> my parenthesis, but I've tried (seemingly) everything. >>>>> >>>>> Even more, when I try the blog users code it works. >>>>> >>>>> >>>>> >>>>> Is it because I’m using longitudinal data? >>>>> >>>>> >>>>> >>>>> Even more. Is it possible to colour each one of the >>> 15 lines with a > > different colour? >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> library(ggplot2) > > library(reshape) > > >>> library(lattice) > > library(gtable) > > library(grid) >>>>> >>>>> attach(mtcars) >>>>> >>>>> beta0 = rnorm (15, 1, .5) > > beta1 = rnorm (15, -1, >>> .5) >>>>> >>>>> tempo = seq(1:5) >>>>> >>>>> CRP7raw = matrix(NA, 15, 5) > > CRP7 = matrix(NA, 15, >>> 5) > > CRP98raw = matrix(NA, 15, 5) > > CRP98 = >>> matrix(NA, 15, 5) >>>>> >>>>> crp <- for (i in 1:15) { > > CRP7raw[i,] = beta0[i] + >>> beta1[i] * tempo > > CRP7[i,] = CRP7raw[i,] + rnorm(5, 0, >>> 2.14) >>>>> >>>>> CRP98raw[i,] = beta0[i] + beta1[i] * tempo > > >>> CRP98[i,] = CRP98raw[i,] + rnorm(5, 0, .1) > > } >>>>> >>>>> >>>>> # plot(c(1:5), CRP7raw[1,], type = "n", xlim=c(1,5), >>> ylim=c(-10,5) , > > # xlab="Day in ICU", > > # ylab="CRP >>> (mg/dL)", > > # sub = mtext(expression(paste(lambda))) >>>>> # >>>>> # CRP7graph <- apply(CRP7, 1, lines, col="gray") >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> # plot(c(1:5), CRP98raw[1,], type = "n", xlim=c(1,5), >>> ylim=c(-10,5), > > # xlab="Day in ICU", > > # ylab="CRP >>> (mg/dL)") > > # CRP98graph <- apply(CRP98, 1, lines, >>> col="gray") >>>>> >>>>> par(mfrow=c(1,2)) >>>>> >>>>> plot(c(1:5), CRP7raw[1,], type = "n", xlim=c(1,5), >>> ylim=c(-10,5) , > > xlab="t_i", > > ylab="y_ij", > > sub >>> = "lambda = 0.7") >>>>> >>>>> CRP7graph <- apply(CRP7, 1, lines, col="gray") >>>>> >>>>> >>>>> plot(c(1:5), CRP98raw[1,], type = "n", xlim=c(1,5), >>> ylim=c(-10,5), > > xlab="Day in ICU", > > ylab="CRP >>> (mg/dL", > > sub = "lambda = 0.98") > > CRP98graph <- >>> apply(CRP98, 1, lines, col="gray") >>>>> >>>>> >>>>> [[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. >>> > >> ________________________________ Tento e-mail a jakékoliv >> k němu připojené dokumenty jsou důvěrné a jsou určeny >> pouze jeho adresátům. Jestliže jste obdržel(a) tento >> e-mail omylem, informujte laskavě neprodleně jeho >> odesílatele. Obsah tohoto emailu i s přílohami a jeho >> kopie vymažte ze svého systému. Nejste-li zamýšleným >> adresátem tohoto emailu, nejste oprávněni tento email >> jakkoliv užívat, rozšiřovat, kopírovat či zveřejňovat. >> Odesílatel e-mailu neodpovídá za eventuální škodu >> způsobenou modifikacemi či zpožděním přenosu e-mailu. > >> V případě, že je tento e-mail součástí obchodního jednání: >> - vyhrazuje si odesílatel právo ukončit kdykoliv jednání o >> uzavření smlouvy, a to z jakéhokoliv důvodu i bez uvedení >> důvodu. - a obsahuje-li nabídku, je adresát oprávněn >> nabídku bezodkladně přijmout; Odesílatel tohoto e-mailu >> (nabídky) vylučuje přijetí nabídky ze strany příjemce s >> dodatkem či odchylkou. - trvá odesílatel na tom, že >> příslušná smlouva je uzavřena teprve výslovným dosažením >> shody na všech jejích náležitostech. - odesílatel tohoto >> emailu informuje, že není oprávněn uzavírat za společnost >> žádné smlouvy s výjimkou případů, kdy k tomu byl písemně >> zmocněn nebo písemně pověřen a takové pověření nebo plná >> moc byly adresátovi tohoto emailu případně osobě, kterou >> adresát zastupuje, předloženy nebo jejich existence je >> adresátovi či osobě jím zastoupené známá. > >> This e-mail and any documents attached to it may be >> confidential and are intended only for its intended >> recipients. If you received this e-mail by mistake, >> please immediately inform its sender. Delete the contents >> of this e-mail with all attachments and its copies from >> your system. If you are not the intended recipient of >> this e-mail, you are not authorized to use, disseminate, >> copy or disclose this e-mail in any manner. The sender of >> this e-mail shall not be liable for any possible damage >> caused by modifications of the e-mail or by delay with >> transfer of the email. > >> In case that this e-mail forms part of business dealings: >> - the sender reserves the right to end negotiations about >> entering into a contract in any time, for any reason, and >> without stating any reasoning. - if the e-mail contains >> an offer, the recipient is entitled to immediately accept >> such offer; The sender of this e-mail (offer) excludes any >> acceptance of the offer on the part of the recipient >> containing any amendment or variation. - the sender >> insists on that the respective contract is concluded only >> upon an express mutual agreement on all its aspects. - >> the sender of this e-mail informs that he/she is not >> authorized to enter into any contracts on behalf of the >> company except for cases in which he/she is expressly >> authorized to do so in writing, and such authorization or >> power of attorney is submitted to the recipient or the >> person represented by the recipient, or the existence of >> such authorization is known to the recipient of the person >> represented by the recipient. [[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.
