How to convert text into image in R?

Question

I want to display text information in a graphics plot via textplot(), however text is cut. Does anybody know how to make it fit?

library(gplots)

str <- as.character("R is a programming language for statistical computing and graphics supported by the R Core Team and the R Foundation for Statistical Computing. Created by statisticians Ross Ihaka and Robert Gentleman, R is used among data miners, bioinformaticians and statisticians for data analysis and developing statistical software.[6] Users have created packages to augment the functions of the R language.

According to user surveys and studies of scholarly literature databases, R is one of the most commonly used programming languages used in data mining.[7] As of March 2022, R ranks 11th in the TIOBE index, a measure of programming language popularity, in which the language peaked in 8th place in August 2020")

textplot(str, halign = c("right"),
         valign = c("bottom"), cex=0.5, fixed.width=TRUE,
         cspace=1, lspace=1, mar=c(0, 0, 3, 0) + 0.1,
         tab.width = 8)

you could add `str <- paste(strwrap(str, width = getOption('width')), collapse = '\n')` play around with the value of `width` to get the line width you want — rawr, Jun 16 '22 at 11:21

Quinten · Answer 1 · 2022-06-16T12:04:24.200

Edit: You could use legend in base R plot like this:

str <- as.character("R is a programming language for statistical computing and graphics supported by the R Core Team and \n the R Foundation for Statistical Computing. Created by statisticians Ross Ihaka and Robert Gentleman, \n R is used among data miners, bioinformaticians and statisticians for data analysis and developing statistical software.[6] \n Users have created packages to augment the functions of the R language.

According to user surveys and studies of scholarly literature databases, R is one of the most \n commonly used programming languages used in data mining.[7] As of March 2022, R ranks 11th in the TIOBE index, \n a measure of programming language popularity, in which the language peaked in 8th place in August 2020")

par(mar = c(0,0,0,0))
plot(c(0, 1), c(0, 1), ann = F, bty = 'n', type = 'n', xaxt = 'n', yaxt = 'n')
legend(0, 0.75, legend = c(str), cex = 0.5, bty = "n")

Output:

Old edit: An option is adding \n to your string to create enters and use annotate with ggplot like this:

str <- as.character("R is a programming language for statistical computing and graphics supported by the R Core Team and \n the R Foundation for Statistical Computing. Created by statisticians Ross Ihaka and Robert Gentleman, \n R is used among data miners, bioinformaticians and statisticians for data analysis and developing statistical software.[6] \n Users have created packages to augment the functions of the R language.

According to user surveys and studies of scholarly literature databases, R is one of the most \n commonly used programming languages used in data mining.[7] As of March 2022, R ranks 11th in the TIOBE index, \n a measure of programming language popularity, in which the language peaked in 8th place in August 2020")

library(ggplot2)
ggplot() +
  annotate("text", x = 4, y = 25, size = 3, label = str) +
  theme_void()

Output:

I also tried ggplot but I need align the text margin on left, while here its in in the centre — , Jun 16 '22 at 11:40
@Georgecarrick, Check my edited answer with a base R plot option using `legend`. — Quinten, Jun 16 '22 at 12:04
@Georgecarrick, change `legend` to this: `legend("topleft", legend = c(str), cex = 0.5, bty = "n") `. Now it displays the text topleft. — Quinten, Jun 16 '22 at 12:30

koolmees · Answer 2 · 2022-06-16T12:33:16.963

0

From the documentation:

cex

Character size, see par for details. If unset, the code will attempt to use the largest value which allows the entire object to be displayed.

Edit: New solution based on comments.

str <- gsub('(.{1,80})(\\s|$)', '\\1\n', as.character("R is a programming language for statistical computing and graphics supported by the R Core Team and the R Foundation for Statistical Computing. Created by statisticians Ross Ihaka and Robert Gentleman, R is used among data miners, bioinformaticians and statisticians for data analysis and developing statistical software.[6] Users have created packages to augment the functions of the R language.

According to user surveys and studies of scholarly literature databases, R is one of the most commonly used programming languages used in data mining.[7] As of March 2022, R ranks 11th in the TIOBE index, a measure of programming language popularity, in which the language peaked in 8th place in August 2020"))

textplot(str, halign = c("right"),
         valign = c("top"), fixed.width=F,
         mar=c(0, 0, 3, 0) + 0.1,
         tab.width = 8)

Output:

edited Jun 16 '22 at 12:33

answered Jun 16 '22 at 11:03

koolmees

2,725
9
23

That solution does not work – Jun 16 '22 at 12:02
What is not working for you? On my end the text is not cropped. Is the result you get exactly the same as with your original code? – koolmees Jun 16 '22 at 12:13
could you produce output? – Jun 16 '22 at 12:17
Output added to the answer – koolmees Jun 16 '22 at 12:22
sorry but this is not solution I asked for. – Jun 16 '22 at 12:28
What would you like to see change? Would you rather cut the text with line breaks? – koolmees Jun 16 '22 at 12:30

How to convert text into image in R?

2 Answers2

Linked