Text labels with background colour in R -


i wondering if there simple way add text labels contrasting background r plot using base graphic system. until have used rect() function graphics::strheight() , graphics::strwidth() separately create background box on place text using text(): 

# prepare noisy background: plot(x = runif(1000), y = runif(1000), type = "p", pch = 16, col = "#40404050")  ## parameters text: mytext <- "some text" poscoordsvec <- c(0.5, 0.5) cex <- 2  ## background rectangle:  textheight <- graphics::strheight(mytext, cex = cex) textwidth <- graphics::strwidth(mytext, cex = cex) pad <- textheight*0.3 rect(xleft = poscoordsvec[1] - textwidth/2 - pad,          ybottom = poscoordsvec[2] - textheight/2 - pad,          xright = poscoordsvec[1] + textwidth/2 + pad,          ytop = poscoordsvec[2] + textheight/2 + pad,         col = "lightblue", border = na)  ## place text: text(poscoordsvec[1], poscoordsvec[2], mytext, cex = cex)

this result:

text background

this job quite tedious , run trouble when start using pos, adj, offset etc. tweak positioning of text. aware of teachingdemos::shadowtext() make text stand out background adds outline instead of box.

i looking simple way create text background box, text(x, y, labels, bg = "grey20"). can't first person require such functionality , missing obvious. appreciated. thanks

base graphics

using legend :

plot(x = runif(1000), y = runif(1000), type = "p", pch = 16, col = "#40404050") legend(0.4, 0.5, "some text", box.col = "lightblue", bg = "lightblue", adj = 0.2)

output:

enter image description here ggplot2

geom_label:

library(ggplot2) df <- data.frame(x = runif(1000), y = runif(1000)) ggplot(data = df, aes(x = x , y = y))+    geom_point(alpha = 0.2)+   geom_label(aes(x = 0.5, y = 0.5, label = "some text"),               fill = "lightblue", label.size = na, size = 5)

output: enter image description here


Comments

Post a Comment

Popular posts from this blog

php - Vagrant up error - Uncaught Reflection Exception: Class DOMDocument does not exist -

i've set bento/ubuntu-16.04 vagrant box using php 5.6, , getting following error quite few times when try , run shell script: "uncaught reflection exception: class domdocument not exist". i've tried adding following top of script (not together), each no success: "sudo apt-get install php5.6-xml", "sudo apt-get install php5-xml", "sudo apt-get install php-dom" i've tried resetting server "sudo service apache2 restart". does have suggestions?
Read more

vue.js - Create hooks for automated testing -

Image
qa guys complained can't automate frontend testing. because our html looks same outside. lazy hack did this <template> <div :role="$options.name"> ... </div> </template> <script> export default { name: 'vmcomponentname' } </script> which takes name script , applies html. in browser get: <div role="vmcomponentname"> ... </div> line :role="$options.name" goes in every component. is there dry er solutions? please share. additional details i'll explain in details looking for. imagine have vmusercreate form creates user. test case can create user . to automatically test without role, have use following selector: .wrapper > .wrapper > .wrapper > .submit-button the test extremely brittle (will break lot). if use roles can use [role="vmusercreateform"] .submit-button selector. many folds less brittle. so basically, i'm ...
Read more

Add new key value to json node in java -

i have json file : { "id":1, "name":"abc", "addressdetails": { "city":"newyork" } } i wanted add 1 more key-value ("pincode" : "414141") node 'addressdetails'. i tried using : objectmapper mapper = new objectmapper(); jsonnode root = mapper.readtree(new file("d://test.json")); objectnode node = mapper.createobjectnode(); node.with("addressdetails").put("pincode", "414141"); but it's not getting added, there way can ? you can try you should modify file path objectmapper mapper = new objectmapper(); objectnode nodes = mapper.readvalue(new file("d:\\test.txt"), objectnode.class); nodes.with("addressdetails").put("pincode", "414141"); mapper.writer().writevalue(new file("d:\\test.txt"), nodes);
Read more