search for: darkgray

Hi I made heatmap of QTL based on Lod score. Where I have traits in columns and marker data (rows). I can not cluster both column and rows as I need the right order for marker data. Can someone suggest me better way of generating heatmaps especially the colour key I want to select to visualize the results which are more interesting to look at. > library(gplots) >

HI @ all, I'm looking for a simple solution to supress the y-axis - but only the drawn scale - not the values. Only the numbers should be displayed. I tried yaxt="n" but there everything of the y-axis is supressed. Thanks GeO -- View this message in context: http://r.789695.n4.nabble.com/no-y-axis-tp4649298.html Sent from the R help mailing list archive at Nabble.com.

...ot;#ADD8E666", "#ADD8E699") c1 <- circle(3) polygon( c1, col=clrs[1], border="lightblue") polygon(.67*c1, col=clrs[2], border="lightblue") polygon(.33*c1, col=clrs[3], border="lightblue") arrows(-1, 0, 5, 0, angle=10, length=.2, lwd=2, col="darkgray") arrows( 0, -1, 0, 5, angle=10, length=.2, lwd=2, col="darkgray") One alternative that sort of works is to use the png() driver, and then convert fig.png fig.eps but I need very high resolution to make the real diagram legible. It might suffice to use hcl() colors to approximate w...

Buenas. Sé que en R hay multitud de datasets y me haría falta alguno que trataran de variables relacionadas con salud, sobre todo para aprender más acerca de cómo realizar una regresión logística binomial o multinomial. Gracias..

...t;,units="cm",width=15,height=36,res=700) layout(matrix(c(1,2,3,4,5,6),3,1),widths=lcm(c(15)),heights=lcm(c(12,12,12)),respect=TRUE) plot.t1<-plot(data.dist,flot1.bray.hell,xlab="",ylab="Bray-Curtis dissimilarity index",cex.lab=2,cex.axis=1.7,pch=20,cex=2,col="darkgray",font=2,font.lab=2);text(0,0.34,"a",font=2,cex=1.7);text(1.5,0.07,"y=0.041x + 0.113",cex=1.7,font=2);text(1.3,0.05,"R2=0.1785",cex=1.7,font=2);text(1.75,0.05,"p<0.001",cex=1.7,font=2);abline(0.113737,0.041476,lwd=2) plot.t2<-plot(data.dist,flot2.b...

...et some options, will these be created in the global environment? If not, how to make them so? .onLoad <- function() { options(heplot.colors = c("red", "blue", "black", "darkgreen", "darkcyan","magenta", "brown","darkgray")) } My function could then use foo <- function(x, getOption("heplot.colors"), ...) {} -- Michael Friendly Email: friendly AT yorku DOT ca Professor, Psychology Dept. York University Voice: 416 736-5115 x66249 Fax: 416 736-5814 4700 Keele Street Web: http://www...

...for (i.map in 1:length(map.list)) { > # plots <- plots + latticeExtra::layer( > # # why does this fail if map.shp is local? see 'KLUDGE' in callers :-( > # sp::sp.lines( > # as(map.list[[i.map]], "SpatialLines"), > # lwd=0.8, col='darkgray')) > # } # end for (i.map in 1:length(map.list)) > # plot(plots) > # For now, kludge :-( handle lists of length 1 and 2 separately: > if (length(map.list) == 1) { > plot( > rasterVis::levelplot(brick, > margin=FALSE, > layout=c(1,l...

...trying to plot hazard risk values using the function metaplot with the specifications: > metaplot(HR,SE,W,labels=row.names(lc),xlab="Hazard Ratio",ylab="Covariates", logeffect=TRUE,logticks=FALSE,colors=meta.colors(box="black",lines="dark gray",zero="darkgray"),cex=1.5,cex.lab=1.5,font=3) However, in the plot the x axis starts after my minimum point; precisely, the x axis ticks start at 2 even if my minimum hazard is 0.44 (i.e. exp(-0.8)); I've also tried to use xlim in metaplot (by fixing xlim<-c(0.44, 4)) but when I do this the HR error...

Hi Ace, You can do it with plotrix: library(plotrix) barpos<-barp(c(1,5,38),width=0.5,col=c("white","lightgray","darkgray"),ylim=c(0,70)) ehplot(c(1,0.8,0.9,0.8,1.1,1,4,3,5,14,3,2,32,27,33,30,50,61), c(1,1,1,1,1,1,2,2,2,2,2,2,3,3,3,3,3,3),median=FALSE,add=TRUE,cex=2, pch=21,bg="white") dispersion(barpos$x,barpos$y,c(0.1,1,5),lwd=2,arrow.cap=0.03) lines(c(barpos$x[2],barpos$x[2],barpos$x[3],barpos$x[3]...

Dear R Community, I recently read an article and found a plot as attached. It has scatterplot, barplot, and error bar. Could anyone help me to figure out what package I can use in R to generate such plot? Thank you very much for any inputs! Kind regards, Ace -------------- next part -------------- A non-text attachment was scrubbed... Name: Screen Shot 2018-02-04 at 6.38.14 AM.png Type: image/png

...lab="sample size", ylab="some stuff", pch=20, log="x", cex=.5, ylim=ylim, ) # HERE'S THE PROBLEM: ON UBUNTU R IS TAKING FOREVER TO PLOT THESE ERROR BARS for (j in 1:J) { lines(rep(n.j[j],2), y.bar[j] + c(-2,2)*sigma.alpha[j], lwd=1.25, col="darkgray") } abline(h=mu) title("Why is R so slow at plotting these error bars on Ubuntu?", cex.main=1.2, line=1) R version 2.9.1 (2009-06-26) i486-pc-linux-gnu locale: LC_CTYPE=en_US.UTF-8;LC_NUMERIC=C;LC_TIME=en_US.UTF-8;LC_COLLATE=en_US.UTF-8;LC_MONETARY=C;LC_MESSAGES=en_US.UTF-8;...

...parameters to lambert: ^^^^^^^^^^^^ # see mapproj::mapproject state.map.shp <- maptools::map2SpatialLines(state.map, proj4string=lcc.crs) pdf(file=lcc.pdf) rasterVis::levelplot(o3.raster, margin=FALSE ) + latticeExtra::layer( sp::sp.lines(state.map.shp, lwd=0.8, col='darkgray')) dev.off() # change this as needed to view PDFs on your system system(sprintf("xpdf %s", lcc.pdf)) # data looks good, but there's no map. ## Try again, with lambert(40,33) state.map <- maps::map( database="state", projection="lambert", par=c(40,33), pl...

...y='dashed',add=T) plot(Municipios,ylab='',xlab='',col=rgb(229,229,229,max=255),add=T) axis(1,xaxp=c(,,)) axis(2,yaxp=c(,,)) points(Pontos$long,Pontos$lat,pch=20) text(Pontos$long,Pontos$lat,rownames(Pontos),pos=1,cex=0.5) text(Prof$Long,Prof$Lat,rownames(Prof),col='darkgray',cex=0.8,srt=-24) Ps.: Sorry for hiding the maps coordinates. I had to, a demand of my coworkers. Thanks in advance. ___________________________________ MSc. <mailto:r.aluizio@gmail.com> Rodrigo Aluizio Centro de Estudos do Mar/UFPR Laboratório de Micropaleontologia [[alterna...

I need to modify the graph of the autocorrelation. I tried to do it through plot.acf but with no success. 1. I would like to get rid of the lag zero 2. I would like to have numbers on the x-axis only at lags 12, 24, 36, 48, 60, ... Could anybody help me in this? Any help will be appreciated Thank you for your attention Stefano [[alternative HTML version deleted]]

...ctor(x) plot.ht<-4.6 plot.wd<-4.6 pt.ht=plot.ht/5 txt.sz<-(plot.ht/7.5) X11(width=plot.wd, height=plot.ht, bg='gray96') qqplot(x, pch=16, cex=pt.ht, col=palette()[c(1,2)], xlab=paste(colnames(x)), ylab='Normal Quantile-Quantile Plot', main='') grid(grid(col = "darkgray")) st.x<-shapiro.test(x) mtext(paste(st.x$method, "\np=",st.x$p.value,"\n W=",st.x$statistic, line=1, cex=txt.sz, adj=0)) adt.x<-ad.test(x) mtext(paste(adt.x$method, "\np=",adt.x$p.value, "\n W=", adt.x$statistic, line=1, cex=txt.sz, adj=1))} m...

...output) { output$distPlot <- renderPlot({ # generate bins based on input$bins from ui.R x <- faithful[, 2] bins <- seq(min(x), max(x), length.out = input$bins + 1) # draw the histogram with the specified number of bins hist(x, breaks = bins, col = 'darkgray', border = 'white') }) } # Run the application shinyApp(ui = ui, server = server) print(environment(show)) El código funciona en otro ordenador con windows 10 con R de 32 bits. Donde no funciona es R de 64 bits Respecto al directorio no es el problema, está probado. Saludos, Jua...

...#39;,''lightgray'',''lightgray'',''lightgray'',''lightyel low'',''lightyellow'',''lightyellow''),add=T,lwd=0.5,border=0) plot(Batimetria,ylab='''',xlab='''',col=''darkgray'',lty=''solid'',lwd=0.2,add=T) plot(Estados,ylab='''',xlab='''',lty=''solid'',add=T,lwd=0.8) text(Coord$Longitude[Coord$Réplicas==''1''],Coord$Latitude[Coord$Réplicas==''1'' ],rownames(Coord)[C...

I am having a problem with a gantt chart since moving to R2.4.0. from 2.3.1 I made some adaptations to the code from http://addictedtor.free.fr/graphiques/RGraphGallery.php?graph=74 and successful produced a simple gantt chart. However when I upgraded to 2.4.0 it no longer works as desired. See http://ca.geocities.com/jrkrideau/R/gantproblem.pdf for the two charts. The charts were produced

...he notch box plots is: #makes the notched box plot. "data" = the name of the data in R. boxplot(data, notch=TRUE, # Gives the title and axis names main="Graph Title", xlab="X axis label", ylab="Y axis label", #Sets the colors col=(c("gold","darkgray", "darkorchid1", "cyan", "white", "red", "limegreen", "magenta", "chartreuse1", "hotpink1"))) # Make a line accross graph for site limit or similar abline(h=5, v=0, col = "red",lty=5,) #adds text for horz...

Hi, Can someone help me with the following? I currently have the following plot: plot(c(0,14,0,14),c(0,5,0,5),ann = FALSE, xaxs="i", yaxs="i",bty="L" ) polygon(c(0,18,18), c(0,6,0), col='light grey', border = NA) polygon(c(0,18,18), c(0,2,0), col='grey', border = NA) However, I would like to make such a plot, but where there is a continuous shading