Draw line from Label to point in R -


i trying generate automated script create labeled line graph. line graphs have 1 or more maxima if above threshold must labeled. can label maxima fine.

https://drive.google.com/file/d/0b50v8ccfhjdqwf94sg85nxvzy1k/view?usp=sharing

for using textxy() in calibrate package

however when multiple peaks occur things more complicated:

https://drive.google.com/file/d/0b50v8ccfhjdqumf5verhuv8znmc/view?usp=sharing

it becomes difficult see label assigned to. line label top (or below) of peak.

i've looked around day today no luck. tried in intelligent point label placement in r

wordcloud, unfortunately doesn't allow offset labels, , fails if have 1 label.

identify, slow. need able automate thousands of images day.

pointlabel, thigmophobe.labels both didn't work don't draw line, , not dealing lots of labels anyway.

i tried manually drawing arrow between label , point, got time consuming.

does know of package or easy way this? not possible automate?

thanks! cameron

you can try labelpeaks function provided maldiquant package. algorithm place peak labels taken ian fellows' wordcloud::wordlayout.

library("maldiquant")  data("fiedler2009subset")  ## simplified preprocessing provide example data s <- trim(fiedler2009subset[[1]], c(3000, 3500)) r <- removebaseline(s) p <- detectpeaks(r)  ## plot peaks , label them plot(p, ylim=c(0, 30000)) labelpeaks(p, avoidoverlap=true, underline=false, digits=1)

enter image description here

## rotate labels 90 degree plot(p, ylim=c(0, 30000)) labelpeaks(p, underline=false, srt=90, adj=c(0, 0.5), col="red")

enter image description here

## label peaks above 5000 plot(p, ylim=c(0, 30000)) labelpeaks(p, index=intensity(p) > 5000)

enter image description here

please see ?labelpeaks more details.


Comments

Post a Comment

Popular posts from this blog

c++ - Difference between pre and post decrement in recursive function argument -

i have following sample code used pre-decrement void function(int c) { if(c == 0) { return; } else { cout << "dp" << c << endl; function(--c); cout << c << endl; return; } } this function give output input 4 : dp3 dp2 dp1 dp0 0 1 2 3 but when use post decrement void function(int c) { if(c == 0) { return; } else { cout << "dp" << c << endl; function(c--); cout << c << endl; return; } } output goes in infinite loop dp4 can explain me in detail why happens ? this happens because function(c--) called same value of c , when finishes c decremented. recursively called, hence called same value no chance of return , hit stack overflow error. assume this, int x = 1, y = 0; y = x++ result y == 1 , x == 2. if y = ++x , bot x , y 2.
Read more

php - Nothing but 'run(); ' when browsing to my local project, how do I fix this? -

i added new project. made mistake in projectname.conf file in sites-available apache2, led me reinstalling apache2. after reinstalling , re-enabling projects on every page of every project .. <body> run(); </body> .. i've run composer update, restarted service, restarted pc, checked config files, tried disabling new project. there nothing in error log, , access.log: 127.0.0.1 - - [15/may/2015:01:40:47 +0200] "get / http/1.1" 304 181 "-" "mozilla/5.0 (x11; ubuntu; linux x86_64; rv:38.0) gecko/20100101 firefox/38.0" maybe i'm forgetting apache2 reinstall? don't think did different last time installed it. looks haven't setup php correctly. take @ this great guide , maybe you're forgetting link php config apache2.
Read more

php - How can I echo out this array? -

i don't know how go grabbing data in variable , put foreach loop. class tree{ private $info = array( array('name'=>'jim','state'=>'nu','company'=>'nu','phone'=>array('cell'=>'5615111111','office'=>'5611111111'),'email'=>array('primary'=>'exs@example.com','ex@there.com')), array('name'=>'joe smith','city'=>'phoenix','phone'=>'4805551111','email'=>'jsmith@some_email.com'), array('name'=>'john doe','city'=>'chandler','company'=>'doe co.','email'=>array('jdoe@gmail.com','personal'=>'email@email.com'),'phone'=>'6025550002') ); } if you're inside of class, can access private variable using $this->variablename . example, i...
Read more