在ggplot2中绘制欧元符号€？

Question

欧元符号€在PDF输出

ggplot() + theme_bw() + geom_line() + scale_y_continuous(formatter = "euro") 

Answer 1

使用ISOLatin9.enc编码开始PDF图形

pdf(encoding = "ISOLatin9.enc") 

在http://stat.ethz.ch/R-manual/R-patched/library/graphics/html/text.html时示为...是说，欧元符号可以选择ISO-8895-15（拉丁语9）其中欧元为字符

Answer 2

以下是3种格式为“EU”格式的数字的方法：

# 1. Method 1 
library(scales) 
euro <- dollar_format(prefix = "\u20ac", big.mark = ",") 
euro(20) 

# 2. Method 2 
library(formattable) 
currency(20, symbol = "\U20AC", digits = 0) 

# 3. Method 3 

# 3.1. Load package 
library(DT) 

# 3.2. Create data set 
m = cbind(matrix(rnorm(120, 1e5, 1e6), 40), runif(40), rnorm(40, 100)) 
colnames(m) = head(LETTERS, ncol(m)) 
m 

# 3.3. Format the columns 'A' (euro), 'C' (usd), and 'D' (percentages) 
datatable(m) %>% 
    formatCurrency(c('A'), '\U20AC', digits = 0) %>% 
    formatCurrency(c('C')) %>% 
    formatPercentage('D', 2) 

希望其中一个可能有用。