r - Select rows from data.frame using vector of names -

-

i keep ~1200 rows data.frame remove rest of rows have use vector of "gene names" can found in data.frame.

my data (just couple of rows):

> tbl_ready2   gene.name x1_1 x1_2     x1_3     x1_4      x1_5      x1_6      x1_7      x1_8      x1_9  x1_10     x1_11 x1_12    x1_13     x1_14 x1_15     x1_16    x1_17 1 at1g01050    0    0 0.000000 0.000000 0.0000000 0.0000000 0.7137613 0.0000000 1.1431194 0.0000 0.0000000     0 0.000000 0.0000000     0 0.0000000 0.000000 2 at1g01080    0    0 1.912532 1.263598 0.9972625 0.8363335 0.9984333 1.0027375 0.7207666 0.0000 0.7155959     0 0.000000 0.0000000     0 0.0000000 0.000000 3 at1g01090    0    0 0.000000 0.000000 0.0000000 0.1864505 0.0000000 0.1057995 0.7634527 0.9794 1.1207689     1 1.276209 0.9701439     0 0.8552922 0.000000 4 at1g01220    0    0 0.000000 0.000000 0.0000000 0.0000000 0.0000000 0.0000000 1.0000000 0.0000 0.0000000     0 0.000000 0.0000000     0 0.0000000 0.000000 5 at1g01320    0    0 0.000000 0.000000 0.0000000 0.0000000 0.0000000 0.0000000 0.0000000 0.0000 1.0000000     1 1.106175 0.8972847     0 0.6782750 1.313616       x1_18    x1_19 x1_20    x1_21 x1_22 x1_23     x1_24 1 0.0000000 0.000000     0 0.000000     0     0 0.0000000 2 0.0000000 0.000000     0 0.000000     0     0 0.5538011 3 1.0182444 2.138711     0 1.554696     0     0 1.6815517 4 0.0000000 0.000000     0 0.000000     0     0 0.0000000 5 0.7313952 1.268605     0 2.128264     0     0 1.0000000

vector of names (not of them):

> vec    [1] at1g02500 at1g07780 at1g08250 at1g08630 at1g09780 at1g09795 at1g10060 at1g10070 at1g11790 at1g12230 at1g13440 at1g14810 at1g15710 at1g16300 at1g17290   [16] at1g17745 at1g18500 at1g18640 at1g22020 at1g22170 at1g22410 at1g23310 at1g24807 at1g24909 at1g25083 at1g25155 at1g25220 at1g29410 at1g31180 at1g31230   [31] at1g31860 at1g32380 at1g32440 at1g32480 at1g33320 at1g36370 at1g44820 at1g48470 at1g48850 at1g48860 at1g50090 at1g50110 at1g54100 at1g54340 at1g55880   [46] at1g55920 at1g56190 at1g58080 at1g62800 at1g63290 at1g65930 at1g69370 at1g70580 at1g71100 at1g71920 at1g72330 at1g72810 at1g74030 at1g74040 at1g75330

so tried function. thought should work doesn't...

data <- tbl_ready[intersect(vec, tbl_ready[,1])]

any ideas ?

you using tbl_ready , tbl_ready2 in example. if tbl_ready2 data.frame want subset, try:

data<-tbl_ready2[tbl_ready2$gene.name %in% vec,]

Comments

Post a Comment

Popular posts from this blog

matlab - "Contour not rendered for non-finite ZData" -

-
i'm trying plot frequency characteristic equation using ezplot, matlab gives following warning, "contour not rendered non-finite zdata". have used command plot frequency equations warning , plot display empty , not change axis range well. can please help. appreciated. here's code i'm using. % transfer matrix case-i, thin rotor clear all; clc; ei = 1626; l = 0.15; m = 0.44108; = 2.178*10^-4; i_p = 2.205*10^-5; itr = 0.24; i_pr = 0.479; syms p n; f = [1 l*1i l^2/(2*ei)*1i l^3/(6*ei); 0 1 l/ei -l^2/(2*ei)*1i; 0 0 1 -l*1i; 0 0 0 l]; p = [ 1 0 0 0; 0 1 0 0; 0 -it*p^2+i_p*n*p 1 0; -m*p^2 0 0 1]; p_r = [1 0 0 0; 0 1 0 0; 0 -itr*p^2+i_pr*n*p 1 0; -m*p^2 0 0 1]; = f*p*f*p*f*p*f; b = p_r*f*p*f*p*f; r = a(1,2)/a(1,4); a12_p = 0; a22_p = a(2,2)-r*a(2,4); a32_p = a(3,2)-r*a(3,4); a42_p = a(4,2)-r*a(4,4); ap(2,2) = a22_p; ap(3,2) = a32_p; ap(4,2) = a42_p; ap(4,4) = 1; c = b*ap; m = [c(3,2) c(3,4); c(4,2) c(4,...
Read more

delphi - Indy UDP Read Contents of Adata -

-
i using indy udp server read string of data. however, not know how work adata parameter. can around converting binary using bytetobin function below , convert hex using bintohex1 . feel stupid , works slow. know how can directly results without 2 conversions? thanks!! here codes: procedure tform1.idudpserver1udpread(athread: tidudplistenerthread; const adata: tidbytes; abinding: tidsockethandle); var buf: tidbytes; buffer: string; data_received: string; begin if bytestostring(adata) <> 'hello' begin buffer := hextostring('00'); setlength(buf, length(buffer)); copytidstring(buffer, buf, 0); abinding.sendto(abinding.peerip, abinding.peerport, buf); data_received := bintohex1(bytetobin(adata[1]) + bytetobin(adata[2]) + bytetobin(adata[3]) + bytetobin(adata[4]) + bytetobin(adata[5]) + bytetobin(adata[6]) + bytetobin(adata[7]) + bytetobin(adata[8]) + bytetobin(adata[9]) + bytetobin(adata[10]) + bytetobin(adata[11...
Read more

javascript - Any ideas when Firefox is likely to implement lengthAdjust and textLength? -

-
any ideas when firefox implement lengthadjust andtextlength?..... working svg application. lengthadjust , textlength working fine in chrome not working in fire fox . <svg viewbox = "0 0 500 300" version = "1.1"> <defs> <path id="s3" d="m 10,90 q 100,15 200,70" /> </defs> <g> <text font-size = "20"> <textpath xlink:href="#s3" textlength="205"> short text</textpath> </text> <use xlink:href="#s3" fill="none" stroke="black" stroke-width="1"/> </g> </svg> this implemented in firefox text elements (not textpath or tspan) in case that's ok though can move attribute text element. <svg viewbox = "0 0 500 300" version = "1.1"> <defs> ...
Read more