Hi Petr;
Thanks so much. Here are the questions and the dput(A) and dput(B). Basicaly I 
have two questions;
> dput(A)structure(list(posA = c(1L, 2L, 5L, 4L, 9L), posB = c(9L, 7L, 12L, 7L, 
> 13L)), .Names = c("posA", "posB"), class = "data.frame", row.names = c(NA, 
> -5L))> dput(B)structure(list(pos = c(4L, 2L, 7L, 1L, 13L, 12L, 9L), a = 
> c(0.4, 0.1, 0.5, 0.4, 0.1, 0.2, 0.3), b = c(7L, 5L, 8L, 1L, 6L, 11L, 12L), c 
> = c(0.8, 0.4, 0.32, 0.1, 0.13, 0.01, 0.23)), .Names = c("pos", "a", "b", 
> "c"), class = "data.frame", row.names = c(NA, -7L))
Q1) Values in A represent the region of chromosome. I need choose these regions 
in B (all region in A are exist in B in a single column) and then summing up 
the column "a in B and count the numbers that gives >0.7. For example, consider 
 the first row in A. They are 1 and 9. After sorting the first column in B then 
summing column "a" only between 1 to 9 in sorted B and cut off at >0.7. Then 
count how many rows in sorted B gives >0.7. For example there are only 5 rows 
between 1 to 9 in sorted B and only summing first 2 of them  gives>0.7 . Then 
my answer is going to be 2
Q2) What is the min value of B$a for given each intervals in A
Regards,
Oslo 

    On Monday, June 13, 2016 8:05 AM, PIKAL Petr <petr.pi...@precheza.cz> wrote:
 

 Ok.

Instead of explaining what you have, please send a result of

dput(B) and dput(A)

And set you mail client to send plain text mail otherwise your code is barely 
readable.

What do you want to do with printed values?

What is B? From this it seems that it is data frame but then you try to put 
sorted data frame into a data frame column.

B$possort=B[order(B$pos),]

With such code and data frame I get an error.

So please try to keep above mentioned when posting a query.

Regards
Petr


> -----Original Message-----
> From: R-help [mailto:r-help-boun...@r-project.org] On Behalf Of oslo via R-
> help
> Sent: Friday, June 10, 2016 11:09 PM
> To: oslo <o...@yahoo.com>; Jeff Newmiller <jdnew...@dcn.davis.ca.us>;
> oslo via R-help <r-help@r-project.org>; oslo <hok...@yahoo.com>
> Subject: Re: [R] summing up a column.
>
> Jeff;
>  thanks for this. My question was job related. No from my course. I need
> finish a job for the place I work. I am so sorry for causing misunderstanding.
> thanks,
> Oslo
>
>    On Friday, June 10, 2016 5:08 PM, oslo via R-help <r-help@r-project.org>
> wrote:
>
>
>  Jeff thanks for this. My question was job related. No from my course. I need
> finish a job for the place I work. I am so sorry for causing misunderstanding.
> thanks,
> Oslo
>
>    On Friday, June 10, 2016 5:02 PM, Jeff Newmiller
> <jdnew...@dcn.davis.ca.us> wrote:
>
>
>  Multiple posting happens when you are learning a new system, but reading
> the posting guide can keep the bleeding down.
>
> 1) There is a no-homework policy on this list... different educational
> organizations have different standards for what is acceptable outside help,
> so you should be using the support offered by your instructor or educational
> institution.
>
> 2) Once you have completed your course, you CAN learn to post data with
> your code so that it is self-contained... that is, reproducible on our 
> vanilla R
> session. Using the dput function is one excellent strategy.
>
> 3) This is not a problem that needs a loop... as Bert (not Bret) said, you 
> can do
> this in one or two statements if you simply use basic logical indexing. If 
> your
> instructor wants you to do it with a loop for sine reason then you really 
> really
> should not be here... you should be talking to him/her.
> --
> Sent from my phone. Please excuse my brevity.
>
> On June 10, 2016 1:34:03 PM PDT, oslo via R-help <r-help@r-project.org>
> wrote:
> Dear All;
> I had difficulty to post a mail along with appropriate of data structure. I do
> sincerely apologize for multiple posting
>
>
> I would like to sum up the B$a column and cut off at 0.7 for the each row of
> intervals giving in file=A.For example the interval  at the first row in 
> A$posA
> and A$posB is 1 and 9. So, I need adding up the B$a and cut off B$a>.7 from
> the 1 to 9 in B$pos. And then I need to the same using the intervals in the
> second, third..... rows in A. Obviously my loop is wrong and  does not work
> properly. Please help for my this first experience.  Regards Here are my
> codes #sorting B$possort=B[order(B$pos),] #Running loop for(i in 1:nrow(A))
> {if(sum(B[a$B, i:A[1:2])>0.7) {print(A[1:i,]) } } Reply, R 
> 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.
>
>
>      [[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.

Reply via email to