> On Jun 3, 2020, at 3:45 PM, THIOULOUSE JEAN <jean.thioulo...@univ-lyon1.fr> > wrote: > > > use cex = 1 instead of cex = 2
Yes, that’s fine, but I wanted a bolder version, perhaps this will have to do. Apologies to all for my irreproducible example, the segments() call can be deleted and n was supposed to be length(v). I will write "examples should be tried in a fresh session" 100 times on the blackboard. > > Eternity is very long, especially towards the end. True. > > Jean > > —- > Jean THIOULOUSE - orcid.org/0000-0001-7664-0598 > http://lbbe.univ-lyon1.fr/-Thioulouse-Jean-.html > https://www.springer.com/fr/book/9781493988488 > > >> Le 3 juin 2020 à 15:40, Koenker, Roger W <rkoen...@illinois.edu> a écrit : >> >> If someone could advise me on how to get the “]” and “(“ characters to look >> remotely like they should in the following code, I would be eternally >> grateful. >> Having experimented with pdf.options() and the vfont option for text() I’m at >> a loss. Rather than “]” I see only a black rectangle. >> >>> sessionInfo() >> R version 3.6.2 Patched (2019-12-12 r77564) >> Platform: x86_64-apple-darwin15.6.0 (64-bit) >> Running under: macOS Mojave 10.14.6 >> >> # PDF Font issue for "]" >> v <- c(-0.59103110,0.02659437,-1.51655310,-1.36265335, >> 1.17848916,-0.93415132,1.32360565,0.62491779,-0.04572296,-1.00412058) >> y <- c(1,1,1,0,1,0,1,0,1,0) >> pdf("One.pdf", height = 2, width = 7) >> plot(v[y==1],sample(c(-1,1),sum(y),replace = TRUE), type = "n", >> axes = FALSE, xlim = range(v),xlab = "", ylab = "") >> text(v[y==1],rep(0,sum(y)), "]", cex = 2) >> abline(h = 0) >> text(v[y==0],rep(0,n-sum(y)), "(", cex = 2, col=2) >> segments(c(vo[1]-0.1,vo)[klmax],c(0,0),c(vo[1]-0.1,vo)[klmax+1],c(0,0), >> col = 2, lwd = 2) # (use right end point to represent interval) >> dev.off() >> >> _______________________________________________ >> R-SIG-Mac mailing list >> R-SIG-Mac@r-project.org >> https://stat.ethz.ch/mailman/listinfo/r-sig-mac > _______________________________________________ R-SIG-Mac mailing list R-SIG-Mac@r-project.org https://stat.ethz.ch/mailman/listinfo/r-sig-mac
