r - latticeExtra doubleYScale, problems retaining original log-scale formatting -


similar question posed troels in 2014, in example below, both plot1 , plot2 formatted intended. in superimposed plot, original log-scale formatting lost on y2 axis: reverts clunky '^' format. problem (secondary) can't change size of ylab2 title without losing label entirely. have searched , tried various code (e.g., 'update' .) no avail. below script - ease of replication, using "diamonds" data set ggplot2 package (plots not make sense).

require(ggplot2)  #access "diamonds" dataset require(dplyr) require(latticeextra)  # generate mock dataframe example mock <- diamonds %>% select(clarity, depth, price) %>% filter(price>1000 &         row_number()<1000) %>% mutate(newvar = sample(1000, size = nrow(mock), replace = true))  plot1 <- xyplot(price ~ depth | clarity, mock, as.table=true, grid=true,             type = c("p", "r"), lwd=1, pch=16,                   xlab=list(label="depth", cex=0.9),               ylab =list(label="price", cex=0.9),              main="how retain original plot2 scale labels in superimpose?",             par.settings = list(                 layout.widths = list(ylab.axis.padding=2.5)))  plot2 <- xyplot(newvar ~ depth | clarity, mock, as.table=true, grid=true,             type = c("p", "r"), lwd=1, pch=16,             scales=list(y=list(log=t, equispaced.log = false)), # above refine y-axis labels - i.e., remove "^" (not retained in overlay)             ylab = "newvar (units)")              # last code call gets retained in overlay             # ylab = list(label="newvar(units)", cex=0.9))... not  #superimposing 2 plots doubleyscale(plot1, plot2, style1 = 0, style2 = 3, add.ylab2 = t, add.main=t)

for "combinelimits", deepayan states "in particular, log-scales not yet work." case doubleyscale? know type of plot discouraged, dataset helpful visualizations. have same problem if both y1 , y2 log-scale. in advance, -susan


Comments

Post a Comment

Popular posts from this blog

javascript - Create a stacked percentage column -

i have collection of data : var data = [ {"p301a":"10","p301b":"7","p301c":"7","p301d":"3","p301e":"8","p301f":"8","p301g":"8","p301h":"8","p301i":"8","p301j":"8","p301k":"8","p301l":"8","p301m":"8","p301n":"8","p301o":"8","age":"31-40 years","profesion":"2","position":"2"}, {"p301a":"5","p301b":"4","p301c":"4","p301d":"4","p301e":"4","p301f":"4","p301g":"4","p301h":"4","p301i":"4","p301j":"4","p301k":"4...
Read more

Optimising Firebase database by automatically overwriting data -

in firebase app have following structure: posts latest all users can write posts > latest . want limit entries 20 posts save space in database. , posts beyond 20 unnecessary never shown on homepage. how can limit posts 20, when user writes posts > latest posts @ end drop off (be deleted) automatically? this sample should you. you need : const max_log_count = 20; exports.removeold = functions.database.ref('/posts/latest/{postid}').oncreate(event => { const parentref = event.data.ref.parent; return parentref.once('value').then(snapshot => { if (snapshot.numchildren() >= max_log_count) { let childcount = 0; const updates = {}; snapshot.foreach(function(child) { if (++childcount <= snapshot.numchildren() - max_log_count) { updates[child.key] = null; } }); // update parent. removes children. ...
Read more

javascript - Angular UI-Grid customTemplate directive causing rows to load slowly/? -

Image
each grid cell can have more 1 customtemplate loaded. have directive holds watcher on model_col_field listen cell updates on scroll when dom rows updated , recompile celltemplate . without watcher , $compile rows repeat on scroll, showing same set of rows. is there more angular way of approaching or way improve performance? relevant controller code: create gridoptions.data & gridoptions.columndefs : var customtemp = '<div ng-repeat="opt in grid.appscope.colvalueoptionsmodel" ng-init="tempstring=model_col_field.clazz+opt.key;"><comparison-directive dbo="model_col_field" attobj="opt" fff="grid.appscope.getattributetemplate(tempstring)" /></div>'; $scope.gridoptions.columndefs = [ { name:'yindex',pinnedleft:true,celltemplate: customtemp, displayname:'index'}, { name:'col1',celltemplate: customtemp}, { name:'col2',celltemplate: c...
Read more