similar to: changing font to italic for one entry in legend()

Hello, I'm trying to add a symbol (Delta) to plot legend with text using "expression(paste())" but this disables the text.font that allows to use bold or italic text. as follows: x=c(1:10) y=c(1:10) plot(x,y) legend(1,10,legend=c("A","B","C",expression(paste(Delta, D))), pch=c(24,18,17,16),cex=2,text.font=3,bty="n") Any suggestion to

I am trying to create a plot that has multiple plot characters for each point (e.g. a point within a triangle, a triangle within a square, etc). The workaround I have found to do this is by plotting twice, as in this example: x <- c(1.1, 2.3, 4.6) y <- c(2.0, 1.6, 3.2) plot(x, y) points(x,y, pch=20, col="red", cex=0.5) This works, but perhaps there is a better way to do it in one

Hello, I am a R beginner and hoping to obtain some hints or suggestions about using permutations to sort a data set I have. Here is an example dataset: Ind1 11 00 12 15 28 Ind2 21 33 22 67 52 Ind3 22 45 21 22 56 Ind4 11 25 74 77 42 Ind5 41 32 67 45 22 This will be read into a variable using read.table. What I want to do is permute these individuals and every

Hello - I want to generate stacked plots with par(mfrow)) function. However, my axis labels aren't showing. My script is here: http://pastebin.com/yXXeMQgb The plot is here: http://www.crypticlineage.net/rdisc/strplot.pdf Thank you for your time. Vikram

Hello - I have a population of 100 individuals that I would like to bootstrap 10 times, every time removing 5 *different* individuals. So far, I have done the following: pop <- read.table('mypop.txt', header=FALSE) replicate(10, sample(pop, 95, replace=FALSE)) I have not actually gone through each of the 10 files created to make sure no single individual was removed more than once

Hello, A bit of fairly simple code, yet I don't seem to be able to manipulate it quite as much as I would like: 1) It would be nice if the objects appearing in the legend were aligned, and by aligned I mean the boxes are centered over the lines. Do I need to adjust the use of "NA" in the code below to accomplish this? Here's how it appears on my machine:

Hi R users: How can I obtain an italic font only for one of the two strips in a xyplot? library(lattice) t<-rep(seq(0,10,5),4) logCFU<-c(2,2.5,3,4,4.5,1.5,2,2.5,3,3.4,2,2.5) microorg<-factor(rep(c("E. coli","L. monocytogenes"),each=6)) tratam<-factor(rep(c("t1","t2"),6)) xyplot(logCFU~t|microorg+tratam,type="p",

Hi all, I have the following problem: Since R 3.4.0, italic fonts rendered on Cairo devices appear pixelated. Here's a minimal example: cairo_pdf('test.pdf') plot(1:10, ylab=expression(italic(test))) dev.off() The same problem occurs with bolditalic, but not bold. I am using Debian Stretch. Several friends tried the same on their machines, another Debian machine has the same

Hi all, I have the following problem: Since R 3.4.0, italic fonts rendered on Cairo devices appear pixelated. Here's a minimal example: cairo_pdf('test.pdf') plot(1:10, ylab=expression(italic(test))) dev.off() The same problem occurs with bolditalic, but not bold. I am using Debian Stretch. Several friends tried the same on their machines, another Debian machine has the same

Hi folks, Please let me know what I am doing wrong. I want to have a legend with symbols that are filled with same color as the drawn line, but I failed to do that: plot(1:100, 1:100, pch=21, bg="red") legend("bottomright", "test", bty='n', pch=21, bg="red", col="red") It looks to me that the "bg" option in legend does not

Thank you for providing advice on this graphics question. I am building an interaction.plot. d=data.frame(xx=c(3,3,2,2,1,1),yy=c(4,3,4,3,4,3),zz=c(5.1,4.2,4.4,3.5,3.3,-1.1,-1.3) d[[1]]<-as.factor(d[[1]]) d[[2]]<-as.factor(d[[2]]) print(d) interaction.plot(d$xx, d$yy, d$zz, type="b", col=c("red","blue"), legend=F, lty=c(1,2), lwd=2, pch=c(18,24),

Hi Ilia, I'm running Arch Linux, R 3.4.0. Here's my test.pdf from your minimal example: https://ptpb.pw/HxsA.pdf It doesn't look pixelated to me... Here's a post that I wrote when I solved my last font problem in R, almost 2 years ago: https://stackoverflow.com/a/40940331/5087283 I had to install some Microsoft font packages, which is sad, because there are some perfectly

Hi Ilia, I'm running Arch Linux, R 3.4.0. Here's my test.pdf from your minimal example: https://ptpb.pw/HxsA.pdf It doesn't look pixelated to me... Here's a post that I wrote when I solved my last font problem in R, almost 2 years ago: https://stackoverflow.com/a/40940331/5087283 I had to install some Microsoft font packages, which is sad, because there are some perfectly

Dear all, Is it possible to somshow plot text as italic AND bold. I tried font=c(2,3) in text(), but it doesn't work. It seems like the latter value is used. Thanks in advance! Sincerely, Tord ----------------------------------------------------------------------- Tord Sn?ll Avd. f v?xtekologi, Evolutionsbiologiskt centrum, Uppsala universitet Dept. of Plant Ecology, Evolutionary Biology

Hi, As part of the legend to a plot, I need to have the "n" in italics because it is a requirement of the journal I aim to publish in: "This study, n = 3293" Presently I have: legend(20, 105, "This study, n = 3293", pch=1, col=rgb(0,0,0,0.5), pt.cex=0.3, cex=0.8, bty="n") I suppose I could leave a blank in place of the "n",

Hi Ilia, You may want to have a try of the showtext package (https://github.com/yixuan/showtext). Below is a quick example: library(showtext) showtext.auto() pdf("test.pdf") ## Use the "sans" font family provided by the showtext package ## font == 3 means italic font face plot(1, xlab = "Unicode characters: \u00C0 \u00C6 \u00D8", family = "sans",

Hi, I'd like to make the text in my legends italic, but I can't figure out how to do so. font=3 doesn't work. Googling brings up the possibility of expression(italic()), which produces italics, but I can't get this to work with my label data, which is a vector of strings: legend(locator(1), legend = levels(factor(label.vector)), col = plotting.colours, pch =plotsym.bw,

Hello, I've read in a data file as a frame and now I'd like the columns to be rows and the rows to be columns. What's the easiest way to do this in R? > class(d) [1] "data.frame" > rownames(d) [1] "98x101" "40x98" "30x40" "0x30" > colnames(d) [1] "H..sapiens" "C..elegans"

Hola He estado tratando varias formas de colocar el subíndice para los grados de libertad del F test y la expresión adj; y sencillamente no funciona. legend("topright",legend=c(expression('r[adj]=0.40'),expression('F[3,23]=15.43'),expression('P < 0.001')),col=black, bty='n',cex=0.9) Luego al tratar de colocar las cusriva utilizando par(font=3)

Hi, Could someone please let me know how to plot greek letters in italic. text(0,14,expression(italic(rho)[italic(f)])) only plots the f in italic and text(37,40,expression(italic(rho))) doesn't plot rho in italic. I have checked demo(plotmath), ?plotmath, FAQ, and the archives 2004-2006 without finding the answer. I'm using R 2.1.1. and Windows XP. Thanks! Tord -- Tord Sn?ll