search for: theme_bw

Displaying 20 results from an estimated 60 matches for "theme_bw".

2017 Aug 26
1
about multi-optimal points
...et the colour aesthetic. The ID is numeric so ggplot applies a colour scale. If we cast ID to a factor we get the appropriate colouring. test_df <- data.frame(ID = 1:20, v1 = rnorm(20), v2 = rnorm(20), v3 = rnorm(20)) ggplot(data=test_df, aes(x=v1,y=v2, colour = as.factor(ID))) + geom_point()+ theme_bw()+ xlab('Variable 1')+ ylab('Variable 2') How to choose a number of samples from the dataset you can use the subset function to select by some variable: sub_test_df1 <- subset(test_df, ID < 5) ggplot(data=sub_test_df1, aes(x=v1,y=v2, colour = as.factor(ID))) + geom_point()...
2017 Aug 25
1
about multi-optimal points
...s 1, v2 to be as close as 0. Thanks very much. DF ID v1 v2 v3 1 0.8 0.1 0.7 2 0.85 0.3 0.6 3 0.9 0.21 0.7 4 0.95 0.22 0.8 5 0.9 0.3 0.7 6 0.8 0.4 0.76 7 0.9 0.3 0.77 ... fig1 = ggplot(data=DF, aes(x=v1,y=v2))+ geom_point()+ theme_bw()+ xlab('Variable 1')+ ylab('Variable 2') print(fig1) fig2 = ggplot(data=DF, aes(x=v1,y=v3)+ geom_point()+ theme_bw()+ xlab('Variable 1')+ ylab('Variable 3') print(fig2) [[alternative HTML version deleted]]
2017 Aug 26
1
about multi-optimal points
...s numeric so ggplot applies a colour scale. If we cast ID to a > factor we get the appropriate colouring. > > test_df <- data.frame(ID = 1:20, v1 = rnorm(20), v2 = rnorm(20), v3 = > rnorm(20)) > > ggplot(data=test_df, aes(x=v1,y=v2, colour = as.factor(ID))) + > geom_point()+ theme_bw()+ > xlab('Variable 1')+ ylab('Variable 2') > > How to choose a number of samples from the dataset you can use the subset > function to select by some variable: > sub_test_df1 <- subset(test_df, ID < 5) > > ggplot(data=sub_test_df1, aes(x=v1,y=v2, colour...
2017 Jun 16
1
point size
You could add size = log10_P to the aes() inside geom_point(). Untested code below. See also http://ggplot2.tidyverse.org/reference/geom_point.html ggplot(mydata, aes(x = X, y = log10_P)) + theme_bw() + theme(panel.border=element_blank(), legend.position="top", axis.text=element_text(size = 8)) + geom_point(aes(color = Traits, size = log10_P)) Jean On Fri, Jun 16, 2017 at 9:33 AM, greg holly <mak.hholly at gmail.com> wrote: > Hi all; > > I am running the follow...
2018 Jan 15
1
consolidate three function into one
...;,"green", "blue") legend.labs <- c("Cluster1", "Cluster2", "Cluster3", "Cluster4") } fig <-ggsurvplot(cluster, data = inputfile, risk.table = F, palette = palette, ylim=c(0,1),ggtheme = theme_bw(),xlab="Relapse Free Suvival (Days)", main = "Survival curve",pval = TRUE,font.x = 16,font.y = 16, font.tickslab = 14,font.legend =c(14,"plain","black"), legend = "bottom", legend.title = "T...
2018 Jan 14
1
consolidate three function into one
...legend.labs <- c("Cluster1", "Cluster2", "Cluster3", "Cluster4") > } > > ggsurvplot(cluster, data = inputfile, risk.table = F, > palette = palette, > ylim=c(0,1),ggtheme = theme_bw(),xlab="Relapse Free Suvival (Days)", > main = "Survival curve",pval = TRUE,font.x = 16,font.y = 16, > font.tickslab = 14,font.legend =c(14,"plain","black"), > legend = "bottom", > leg...
2018 Jan 14
1
consolidate three function into one
...;blue") legend.labs <- c("Cluster1", "Cluster2", "Cluster3", "Cluster4") } ggsurvplot(cluster, data = inputfile, risk.table = F, palette = palette, ylim=c(0,1),ggtheme = theme_bw(),xlab="Relapse Free Suvival (Days)", main = "Survival curve",pval = TRUE,font.x = 16,font.y = 16, font.tickslab = 14,font.legend =c(14,"plain","black"), legend = "bottom", legend.title = "Tr...
2008 Sep 10
1
ggplot2: edge outlines on points
...n trying to overlay two plots of the same points, one plotted with fills and the other plotted with edge outlines (here is my conceptual code): pfill <- ggplot(data=DF, aes(x=X, y=Y)) + geom_point(aes(colour=TRT),size=4) + scale_colour_grey(end=0.8) + theme_bw pedge <- ggplot(data=DF, aes(x=X, y=Y)) + geom_point(aes(colour=TRT),size=4) + scale_colour_grey(end=0.8) + scale_shape(solid=FALSE) + theme_bw However, I can''t figure out the correct syntax, if this is even the right way to go abo...
2018 Jan 15
1
consolidate three function into one
...ue") > legend.labs <- c("Cluster1", "Cluster2", "Cluster3", "Cluster4") > } > > > fig <-ggsurvplot(cluster, data = inputfile, risk.table = F, > palette = palette, > ylim=c(0,1),ggtheme = theme_bw(),xlab="Relapse Free Suvival > (Days)", > main = "Survival curve",pval = TRUE,font.x = 16,font.y = 16, > font.tickslab = 14,font.legend =c(14,"plain","black"), > legend = "bottom", >...
2018 Jan 15
1
consolidate three function into one
...quot;,"green", "blue") legend.labs <- c("Cluster1", "Cluster2", "Cluster3", "Cluster4") } fig <-ggsurvplot(cluster, data = inputfile, risk.table = F, palette = palette, ylim=c(0,1),ggtheme = theme_bw(),xlab="Relapse Free Suvival (Days)", main = "Survival curve",pval = TRUE,font.x = 16,font.y = 16, font.tickslab = 14,font.legend =c(14,"plain","black"), legend = "bottom", legend.title = "Tr...
2012 Nov 07
1
change colour of geom_step by scale_colour_manual
...15)) + scale_colour_discrete(name ="Group", breaks=c("ace", "ctrlAM","met"), labels=c("acetone", "untreated","methoprene"))+ theme_bw() + # maek background theme black and white opts(legend.justification=c(1,0),# legend justification needs to be in the (options) legend.position=c(1,0), panel.grid.major...
2010 Dec 06
2
ggplot2: Controlling line width of panel borders
...D) p1 <- ggplot(barley,aes(fill=year,y=yield,x=variety)) p2 <- p1 + geom_bar(position="dodge",stat="identity") dodge <- position_dodge(width=0.9) p3 <- p2 + geom_errorbar(limits,position=dodge,width=0.5,size=0.7) p4 <- p3 + facet_wrap(~site,ncol=2) p5 <- p4+theme_bw(base_size=16) p5 last_plot() + opts(panel.grid.minor=theme_blank()) # deletes the minor grid lines ## Now i would like to increase the width of all remaining lines (bottom, left, top, right border of all panels and stripes) in the plot, as a certain minimum lines width is required by many jo...
2017 Jun 16
1
point size
Hi all; I am running the following ggplot codes. Runs well. However, I need to reflect the numeric values of the log10_P to the point size in the graph. Your help highly appreciated, Regards, Greg p <- ggplot(mydata, aes(x = X, y = log10_P)) + theme_bw() +theme(panel.border=element_blank()) + theme(legend.position="top", axis.text=element_text(size = 8)) (p1 <- p + geom_point(aes(color = Traits) [[alternative HTML version deleted]]
2011 Feb 19
2
barplot, different color for shading lines and bar
Dear all, might there be a modified barplot function out there which allows the user to specify a fill color for the bars and independent parameters for the overlaid shading lines ? Currently, when I specify density and col, the fill color for the bars is white. Thanks! Markus [[alternative HTML version deleted]]
2018 Jan 14
0
consolidate three function into one
...{ cluster2<- survfit(Surv(RFS_days, OV_Had_a_Recurrence_CODE) ~ clusters, data = inputfile) ggsurvplot(cluster2, data = inputfile, risk.table = F, palette = c("red", "black"), ylim=c(0,1), ggtheme = theme_bw(), xlab="Relapse Free Suvival (Days)", main = "Survival curve", pval = TRUE, font.x = 16, font.y = 16, font.tickslab = 14, font.legend =c(14,"plain","black"),...
2012 Mar 22
22
Plotting patient drug timelines using ggplot2 (or some other means) -- Help!!!
...lt;- TestData[TestData$profile_key == 2 & TestData$line == 1,] TestData require(reshape) TestData <- melt(TestData, measure.vars = c("start_drug", "stop_drug")) TestData ggplot(TestData, aes(value, drug)) + geom_line(size = 6) + xlab("") + ylab("") + theme_bw() ggsave(file = "plot21.pdf")
2018 Jan 14
0
consolidate three function into one
...) { cluster2<- survfit(Surv(RFS_days, OV_Had_a_Recurrence_CODE) ~ clusters, data = inputfile) ggsurvplot(cluster2, data = inputfile, risk.table = F, palette = c("red", "black"), ylim=c(0,1), ggtheme = theme_bw(), xlab="Relapse Free Suvival (Days)", main = "Survival curve", pval = TRUE, font.x = 16, font.y = 16, font.tickslab = 14, font.legend =c(14,"plain","black"),...
2011 Nov 16
1
boxplot strange behavior
Hello, I generate box plots from my data like this: qplot(x=xxx,y=column,data=data,geom="boxplot") + xlab("xxx") + ylab(ylabel) + theme_bw() + scale_y_log10() + geom_jitter(alpha=I(1/10)) The problem is that I see lot of points above the maximum at the same level as some outliers. It looks very weird as I expected the outliers to be "few" and specially not see any points other than the outliers below the minimum or abov...
2017 Aug 04
1
legend and values do not match in ggplot
I have following codes for ggplots. The legends are given in the plot do not match with the values specified in the codes given below. Your helps highly appreciated. Greg library(ggplot2) p <- ggplot(a,aes(x=NO_BMI_FI_beta ,y=FI_beta ,color= Super.Pathway))+ theme_bw() +theme(panel.border=element_blank()) + geom_point(size=3) p2<-p+scale_color_manual(name="Super.Pathway", labels=c("Amino Acid", "Cofactors and Vitamins", "Carbohydrate", "Energy", "Lipid", "Peptide", "Nucleotide&quot...
2017 Jul 05
1
How can I make the legend in ggplot2 the same height as my plot?
Hi R Users, I tried to increase the legend height in ggplot2, but it did not respond at all using the follwoing code. Do you have any suggestions for me? dat<-data.frame(temperature) P1<-ggplot(dat, aes(X, Y)) Scenario1<-P1+geom_point(aes(colour = value), size = 1)+ theme_bw()+ theme(axis.text.x = element_blank(),axis.text.y = element_blank()) Scenario1<-Scenario1+facet_wrap(~variable, ncol=2)+scale_color_gradientn(colours = rainbow(48)) Scenario1+guides(fill = guide_colorbar(bar width = 1.5, barheight = unit(10, "mm"))) Thanks, KG [[alternative HT...