get unique entries from a complex list in r -

-

i have list of lists:

      $markers                         mi  chr phys.pos    group     19  mg001   8   4803507 1     20  mg002   8   4841939 1     3   mg003   8   5268581 2     1   mg004   8   5278404 2     6   mg005   8   8352013 3     7   mg006   8   8352443 3     9   mg008   8   8354875 3     10  mg009   8   8356039 4     11  mg010   8   8357610 4     13  mg012   8   8361049 5     14  mg013   8   8361845 5     15  mg014   8   1640281 6     16  mg015   8   1640663 7      $plants                      plant   group            9   dl750   1            11  d827    1            17  dl26    1            25  d901    2            30  dr202   3            35  d356    3            52  f015    4

i list of entries unique in "group", , list of leftovers. results expected as:

(a) unique list:

      $markers                         mi  chr phys.pos    group     19  mg001   8   4803507 1     3   mg003   8   5268581 2     6   mg005   8   8352013 3     10  mg009   8   8356039 4     13  mg012   8   8361049 5     15  mg014   8   1640281 6     16  mg015   8   1640663 7      $plants                      plant   group            9   dl750   1            25  d901    2            30  dr202   3            52  f015    4

(b) leftover list:

      $markers                         mi  chr phys.pos    group     20  mg002   8   4841939 1     1   mg004   8   5278404 2     7   mg006   8   8352443 3     9   mg008   8   8354875 3     11  mg010   8   8357610 4     14  mg013   8   8361845 5      $plants                      plant   group            11  d827    1            17  dl26    1            35  d356    3

appreciate helps.

if mylist list, simply

unique <- lapply(mylist, function(x) x[!duplicated(x$group), ]) unique # $markers #       mi chr phys.pos group # 19 mg001   8  4803507     1 # 3  mg003   8  5268581     2 # 6  mg005   8  8352013     3 # 10 mg009   8  8356039     4 # 13 mg012   8  8361049     5 # 15 mg014   8  1640281     6 # 16 mg015   8  1640663     7 #  # $plants #    plant group # 9  dl750     1 # 25  d901     2 # 30 dr202     3 # 52  f015     4  leftovers <- lapply(mylist, function(x) x[duplicated(x$group), ]) leftovers  # $markers #       mi chr phys.pos group # 20 mg002   8  4841939     1 # 1  mg004   8  5278404     2 # 7  mg006   8  8352443     3 # 9  mg008   8  8354875     3 # 11 mg010   8  8357610     4 # 14 mg013   8  8361845     5 #  # $plants #    plant group # 11  d827     1 # 17  dl26     1 # 35  d356     3

Comments

Post a Comment

Popular posts from this blog

javascript - how to protect a flash video from refresh？ -

-
<!doctype html> <html> <head> <meta http-equiv="content-type" content="text/html; charset=utf-8"> <title>flash video refresh</title> </head> <body> <div id="playerzone"><embed height="496" width="580" flashvars="flvid=19742822&amp;createtime=2012-4-19 13:46:33" wmode="opaque" allowscriptaccess="always" allowfullscreen="true" quality="high" bgcolor="#000000" name="player" id="player" src="swf/mine.swf" type="application/x-shockwave-flash"></div> <a onclick="return test();" id="test">click me popup div,and hide scrollbar</a> </body> the code upon： for example,when click a#test button,popup div,it's no problem,but want hide scrollbar while div popup. i used $('html').css('overflow','hidden') in
Read more

android - Associate same looper with different threads -

-
Image
in application, want create multiple threads working on single queue. create queue know need call looper.prepare() . i want other threads create should associated looper created first thread, how can achieve this? use 1 of java thread safe queue class java.util.concurrent package instead of looper achieve goal. it's more common practice. share queue between threads , post task queue entry 1 thread can entry thread. blockingqueue can - in 1 thread call take() , block thread until thread put() entry queue. that's all. producer consumer pattern example blockingqueue or concurrentlinkedqueue about blockingqueue
Read more

visual studio 2010 - Connect to informix database windows form application -

-
i trying figure out how connect ibm informix database. have been doing research , have found threads 5 years ago examples not working. i have installed latest sdk ibm informix. i have included ibm.data.informix.dll references in project. i have included using ibm.data.informix; i adding button , on click testing conenction. debug error "sql0035n file "c:\users\adam\documents\visual studio 2010\projects\test\test\msg\en_us\db2nmp.xml" cannot opened." this file not exist , dont see anywhere in program files (x86)\ibm informix client sdk directory. my on click code is private void button1_click(object sender, eventargs e) { const string host = "192.168.obfuscated"; const string servicenum = "1525"; //port? const string server = "serverobfuscated"; const string database = "dbobfuscatedy"; const string user = "myusername"; const string password = &
Read more