search for: type1font

...> postscriptFonts() $serif $family [1] "Times" $metrics [1] "Times-Roman.afm" "Times-Bold.afm" "Times-Italic.afm" [4] "Times-BoldItalic.afm" "Symbol.afm" $encoding [1] "default" attr(,"class") [1] "Type1Font" $sans $family [1] "Helvetica" $metrics [1] "Helvetica.afm" "Helvetica-Bold.afm" [3] "Helvetica-Oblique.afm" "Helvetica-BoldOblique.afm" [5] "Symbol.afm" $encoding [1] "default" attr(,"class") [...

Hi, I am trying to create a graph using Arial font (as required by PLoS One). I have read probably all posts in R-help on this topic, as wells as R-news 2006. The code I have been trying is following: Arial <- Type1Font(family="Arial", metrics=c("ArialMT.afm", "arial-BoldMT.afm", "Arial-ItalicMT.afm", "Arial-BoldItalicMT.afm")) postscriptFonts(Arial=Arial) postscript("testArial.eps", horizontal=F, onefile=F, width=4, height=4) par(family=&...

Hi! On Linux I try to produce pdf graphs with computer modern fonts so that they look nice in LaTeX documents. I run for example: ------ CM <- Type1Font( "CM", c("/usr/share/texmf-texlive/fonts/afm/public/cm-lgc/fcmr8a.afm", "/usr/share/texmf-texlive/fonts/afm/public/cm-lgc/fcmb8a.afm", "/usr/share/texmf-texlive/fonts/afm/public/cm-lgc/fcmri8a.afm", "/usr/share/texmf-texlive/fonts/afm/public/cm-lgc/fcmbi...

...nrow(z) > ncz <- ncol(z) > jet.colors <- colorRampPalette( c("yellow", "red") ) > nbcol <- 100 > color <- jet.colors(nbcol) > zfacet <- z[-1, -1] + z[-1, -ncz] + z[-nrz, -1] + z[-nrz, -ncz] > facetcol <- cut(zfacet, nbcol) > > CM <- Type1Font("CM", > c("cm-lgc/fonts/afm/public/cm-lgc/fcmr8a.afm", > "cm-lgc/fonts/afm/public/cm-lgc/fcmb8a.afm", > "cm-lgc/fonts/afm/public/cm-lgc/fcmri8a.afm", > &quot...

...p 2. Computer Moder Super from http://www.ctan.org/get/fonts/ps-type1/cm-super.zip Both are specifically made for Eastern European languages (among many other). The example is (I hope it is fully reproducible): Sys.setlocale(category="LC_CTYPE", locale="hungarian") LM <- Type1Font("LM", paste("lm/fonts/afm/public/lm/", c("lmb10.afm", "lmbx10.afm", "lmbo10.afm", "lmbxo10.afm"), sep="")) pdfFonts(LM=LM) postscriptFonts(LM=LM) CMS <- Type1Font("CMS", paste("cm-super/afm/", c("sfr...

Hello R users, Using R, Sweave and the cmsyase.afm font it is possible to write LaTeX documents including R figures with text in the Computer Modern Fonts: \documentclass{article} \usepackage{Sweave} \begin{document} <<echo = false, results = hide>>= CM <- Type1Font("CM", c(file.path("C:/texlive/2009/texmf-dist/fonts/afm/public/cm-lgc", c("fcmr8a.afm", "fcmb8a.afm", "fcmri8a.afm", "fcmbi8a.afm")), "./cmsyase.afm")) pdfFonts(CM = CM) postscriptFonts(CM = CM) pdf.option...

Hello, R users. I am trying to embed Computer modern fonts to an R plot and I get the following error. CM <- Type1Font("CM", + c(paste("cm-lgc/fonts/afm/public/cm-lgc/", + c("fcmr8a.afm", "fcmb8a.afm", "fcmri8a.afm", "fcmbi8a.afm"), sep=""), + "./cmsyase.afm")) > pdf("cm.pdf", width=3, height=3, family=&qu...

Hi, I try to use the sfrm1000.pfb Type-1 font with my postscript plots. When I add family=CM to the postscript() command the output is empty. What am I doing wrong? # define font CM <- Type1Font('ComputerModern', # font ID c(file.path(getwd(), c('sfrm1000.afm', '', '', ''))), # font metrics encoding='AdobeStd'); # font encoding postscript('sin.ps', family=CM); dev.off();...

...ly [1] "Courier" $metrics [1] "Courier.afm" "Courier-Bold.afm" [3] "Courier-Oblique.afm" "Courier-BoldOblique.afm" [5] "Symbol.afm" $encoding [1] "default" attr(,"class") [1] "Type1Font" That looks all right to me no? How to remedy this? Thanks for your patience, Joh

...onts are available in pdf device (i.e., pdf() or dev.copy2pdf()), and if so, how to do it? Now I can do as followings: 1. convert ttf to afm using ttf2afm, e.g.: $ ttf2afm Impact.ttf > Impact.afm 2. put the afm file in $R_HOME/library/grDevices/afm 3. register a new type1 font: pdfFonts(Impact=Type1Font("Impact", rep("Impact.afm", 4), encoding = "TeXtext.enc")) 4. specify the fontfamily in gpar: grid.text('hello grid world', gp=gpar(fontfamily="Impact")) but obviously, it is better if truetype or opentype fonts are directly available without convers...

...on my Mac (running 10.5.5). I've found the following archived help file on how to do it in Linux (http://tolstoy.newcastle.edu.au/R/e4/help/08/08/19847.html ) but don't understand how to do this on my system. Are *.afm files freely available and do they come with the *.enc file that Type1Font() requires? if so where? Or do I convert some files I already have to *.afm? I've searched around for useful info without much luck. And once I have the *.afm's & an *.enc am I correct in assuming that I put them in the library/grDevices/afm directory and run the following in...

Paul, You solution worked out really well when I ran my code in R. However, when I try to turn the plot into a pdf, the unicode string no longer seems to function and instead of the sigma symbol there are just two periods (See example code below). The following is the code working in the R environment just like I want it to look: set.seed(1) Data=rnorm(100,sd=10000) plot(density(Data))

...fondu.sourceforge.net/] eg, fondu -force Optima.dfont 3. ttf2asm for each ttf file, stripping the Copyright and warning 3. copy files to RHOME/library/grDevices/afm (usually, /Library/Frameworks/R.framework/Versions/2.5/Resources/library/grDevices/afm ) 4. R code to use the font; eg, newfont= Type1Font("Optima",c("OptimaRegular.afm","OptimaBold.afm","OptimaItalic.afm","OptimaBoldItalic.afm")) pdf("newfont.pdf",version = "1.4",family=newfont) plot(rnorm,col="red") dev.off()

...( file.exists(paste(absolute.path.to.font.files, bera.names[i], ".otf", sep="")) ) } pdf.start <- function(pdfbasename, ...) { ? options( pdf.current=pdfbasename ) ?## we need to store the file name ? ## the first argument, the name, does not seem to be used ? berasans <- Type1Font("BeraSans", paste(absolute.path.to.font.files, bera.names, ".afm", sep="")) ? pdf(file = paste(pdfbasename,".PDF", sep=""), family=berasans, ...) } pdf.end <- function(verbose =1) { ? dev.off() ? embedfonts( options("pdf.current") ) }...

...sing the Preview application on a MacBook Pro (see below for details about my R session). I have also attempted to create the same plot using the pdf function. For some reason, pdf does not like `family = "ComputerModernItalic"', so I needed to do the following. > CMitalic <- Type1Font("ComputerModern2", + c("CM_regular_10.afm", "CM_boldx_10.afm", + "cmti10.afm", "cmbxti10.afm", + "CM_symbol_10.afm"), + encoding = "TeXtext.en...

Dear R wizards: [a] I believe that the pdf device does not yet fully support TeXencoding. (under R-2.2.0, the pdf file created with Textext as font encoding still dies when post-processed by ghostscript.) are there any workarounds, or are there utilities that would allow a TeXencoded font to be re-encoded/converted into ISOLatin, perhaps, which R could then handle beautifully? [b] is there a

...versions from late 1999 which cover more glyphs. There are also a few differences in the metrics and hence the output might be slightly different in some cases. o The way families can be specified for postscript() and pdf() has been expanded to include CID-keyed fonts, with new functions Type1Font() and CIDFont() to set up such fonts families. o prettyNum() has new arguments 'preserve.width' and 'zero.print'. When the former is not "none", as in calls from format() and formatC(), the resulting strings are kept at the desired width when possible even after a...

...versions from late 1999 which cover more glyphs. There are also a few differences in the metrics and hence the output might be slightly different in some cases. o The way families can be specified for postscript() and pdf() has been expanded to include CID-keyed fonts, with new functions Type1Font() and CIDFont() to set up such fonts families. o prettyNum() has new arguments 'preserve.width' and 'zero.print'. When the former is not "none", as in calls from format() and formatC(), the resulting strings are kept at the desired width when possible even after a...

...nrow(z) > ncz <- ncol(z) > jet.colors <- colorRampPalette( c("yellow", "red") ) > nbcol <- 100 > color <- jet.colors(nbcol) > zfacet <- z[-1, -1] + z[-1, -ncz] + z[-nrz, -1] + z[-nrz, -ncz] > facetcol <- cut(zfacet, nbcol) > > CM <- Type1Font("CM", >                      c("cm-lgc/fonts/afm/public/cm-lgc/fcmr8a.afm", >                        "cm-lgc/fonts/afm/public/cm-lgc/fcmb8a.afm", >                        "cm-lgc/fonts/afm/public/cm-lgc/fcmri8a.afm", >                        &quot...

...DEFUNCT o The re-named tcltk functions tkcmd, tkfile.tail, tkfile.dir, tkopen, tkclose, tkputs, tkread are now defunct. o Argument 'col' of bxp() has been removed: use 'boxfill'. o Use of NULL as an environment is now an error. o postscriptFont() is defunct: use Type1Font(). o La.chol() and La.chol2inv() are defunct (they were the same as the default options of chol() and chol2inv). o La.svd(method = "dgesvd") is defunct. o Files install.R and R_PROFILE.R in packages are now ignored (with a warning). o The following deprecated command...