[R] scaling loess curves

[Bogdan Tanasa]

Hi Petr,

thank you for your reply regarding the scaling of loess curves. Our
situation is the following :

we do have 2 experiments, and for each experiment, the set of data is in
the following format : "nodeA (chr, start, end) - node B (chr, start, end)
- interaction intensity (between A and B)".

We are trying to SCALE the LOESS curves ( for the graphs "distance between
node A and node B" vs "intensity") for experiment1 vs experiment2, in order
to make the experiments directly comparable.

I have attached 2 figures with the LOESS curves for experiment1 and
experiment2 to my email. Shall you have any suggestions, please let me
know. Thanks a lot,


-- bogdan

On Mon, Sep 7, 2015 at 7:34 AM, PIKAL Petr <petr.pikal at precheza.cz> wrote:

> Hi
>
> what about xlim or ylim?
>
> Cheers
> Petr
>
>
> > -----Original Message-----
> > From: R-help [mailto:r-help-bounces at r-project.org] On Behalf Of Bogdan
> > Tanasa
> > Sent: Monday, September 07, 2015 8:00 AM
> > To: r-help
> > Subject: [R] scaling loess curves
> >
> > Dear all,
> >
> > please could you advise about a method to scale 2 plots of LOESS
> > curves.
> > More specifically, we do have 2 sets of 5C data, and the loess plots
> > reflect the relationship between INTENSITY and DISTANCE (please see the
> > R code below).
> >
> > I am looking for a method/formula to scale these 2 LOESS plots and make
> > them directly comparable.
> >
> > many thanks,
> >
> > -- bogdan
> >
> >
> >
> > -------------- the R code ------------------
> >
> >
> >
> > a <- read.delim("a",header=T)
> > qplot(data=a,distance,intensity)+geom_smooth(method = "loess", size =
> > 1,
> > span=0.01)+xlab("distance")+ylab("intensity")
> >
> >
> >
> > b <- read.delim("b",header=T)
> > qplot(data=b,distance,intensity)+geom_smooth(method = "loess", size =
> > 1,
> > span=0.01)+xlab("distance")+ylab("intensity")
> >
> >       [[alternative HTML version deleted]]
> >
> > ______________________________________________
> > R-help at 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.
>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: example1-1.png
Type: image/png
Size: 16282 bytes
Desc: not available
URL: <https://stat.ethz.ch/pipermail/r-help/attachments/20150911/3fa5e4ef/attachment.png>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: example2-2.png
Type: image/png
Size: 15036 bytes
Desc: not available
URL: <https://stat.ethz.ch/pipermail/r-help/attachments/20150911/3fa5e4ef/attachment-0001.png>