r - Align text right justified but center of each box in geom_text -

-

i have created graph ggplot using geom_tile , geom_text. want able read numbers down 1 column , have them lineup. set font courier , used hjust justify numbers (otherwise negative sign throws off alignment). cant find way keep right justification , center text in middle each box. ideas on how numbers line can scan column quickly?

reproducible example below.

require(reshape2) require(ggplot2) require(scales)  set.seed(504) df_graph <- data.frame("category"=c("green","blue","red","yellow","black","random1","random2","random3","random4","random5","random6","random7",                                     "random8","random9","random10"),"test1"=rnorm(15),"test1"=rnorm(15),"test2"=rnorm(15),"test3"=rnorm(15),                        "test4"=rnorm(15),"test5"=rnorm(15))  df_graph <- melt(df_graph)                        df_graph$text <- round(df_graph$value, 2)  colors_used <- c("#b2182b","#d6604d","#f4a582","#fddbc7","#f7f7f7","#d1e5f0","#92c5de","#4393c3","#2166ac") values <- seq(-4, 4, length = 9)  g <- ggplot(df_graph, aes(variable, category)) g <- g + geom_tile(aes(fill = value), colour = "white", size=0.75) g <- g + geom_text(aes(label=text),size=3, family="courier", hjust = 1) g <- g + scale_fill_gradientn(colours = colors_used, na.value = "#ffffff", values = values,rescaler = function(x, ...) x, oob = identity) g <- g + theme_bw() g <- g + theme(   axis.text.x= element_text(color="black", size=10, angle = 45, hjust = 0.5),   axis.text.y= element_text(color="black", size=8),   axis.title.y = element_text(color="black",size=10),   plot.title = element_text(color="black",size=14,face="bold"),   legend.key = element_rect(fill="white"), legend.background = element_rect(fill=na),   legend.position="none",   legend.title = element_blank(),   panel.grid  = element_blank(),   panel.border = element_blank() )

use hjust=0.5 in geom_text() , pad labels positive numbers appropriately, i.e. prepend space characters obtain labels of equal length:

df_graph$text <- format(round(df_graph$value, 2))

plot


Comments

Post a Comment

Popular posts from this blog

PHP DOM loadHTML() method unusual warning -

-
i had following code works fine on localhost: $document = new domdocument(); $document->loadhtml($p_result); $form = $document->getelementsbytagname('form')->item(0); // code continues using $form variable after same code updated on outside server, loadhtml() failed , issued warning. warning: domdocument::loadhtml() expects parameter 1 valid path, string given in path/name/to/script.php returned null instead of object code pretty gets fatal error. note contents of $p_result absolutely same on outside server , on localhost. but why displays kind of warning , why not work? doesn't loadhtml() expects argument 1 string in first place? why method expects parameter 1 valid path ? just make clear i'm not calling loadhtmlfile() , i'm calling loadhtml() . thanks. you're affected one of php bugs . issue present in php 5.6.8 , 5.6.9. have affected php version on server, , bug-free version on localhost. the bug forbids null
Read more

python - How to create jsonb index using GIN on SQLAlchemy? -

-
here's current code creating index jsonb. index("mytable_data_idx_id_key", mytable.data['id'].astext, postgresql_using='gin') but got error. sqlalchemy.exc.programmingerror: (psycopg2.programmingerror) data type text has no default operator class access method "gin" hint: must specify operator class index or define default operator class data type. [sql: "create index event_data_idx_id_key on event using gin ((data ->> 'id'))"] is there way create index on sqlalchemy? the postgresql specific sqlalchemy docs @ http://docs.sqlalchemy.org/en/latest/dialects/postgresql.html#operator-classes mention postgresql_ops dictionary provide "operator class" used postgresql, , provide example illustrating use: index('my_index', my_table.c.id, my_table.c.data, postgresql_ops={ 'data': 'text_pattern_ops',
Read more

c# - TransactionScope not rolling back although no complete() is called -

-
i'm using transactionscope rollback transaction fail bool errorreported = false; action<importerrorlog> newerrorcallback = e => { errorreported = true; errorcallback(e); }; using (var transaction = new transactionscope()) { foreach (importtaskdefinition task in taskdefinition) { loader.load(streamfile, newerrorcallback, task.destinationtable, processingtaskid); } if (!errorreported) transaction.complete(); } i'm sure there no transactionscope started ahead or after code. i'm using entity framework insert in db. regardless state of errorreported transaction never rolled in case of error. what missing ? transactionscope sets transaction.current . that's does. wants transacted must @ property. i believe ef each time connection opened reason. probably, connection open when scope installed. open connection inside of scope or enlist manually. ef has nasty "design decision": default opens
Read more