Печатать меньше или равно в R?

Question

Я пытался использовать \ u2264 для знака меньше или равного:

> names(table_A1) <- c("x", "P(X=x)", "P(X\u2264x)")
> print(table_A1)

, но это появляется в выводе:

>    x P(X=x) **P(X=x)**
> 1  2  0.562  0.563
> 2  3  0.281  0.844
> 3  4  0.105  0.949
> 4  5  0.035  0.984
> ...

, а если ящелкните таблицу просмотра, это появится:

> x P(X=x) **P(X≤x)**
> 1 2 0.562 0.563
> 2 3 0.281 0.844
> 3 4 0.105 0.949
> ...

Есть ли другой способ, которым я могу напечатать этот знак?

По запросу:

> sessionInfo()
R version 3.5.1 (2018-07-02)
Platform: x86_64-w64-mingw32/x64 (64-bit)
Running under: Windows >= 8 x64 (build 9200)

Matrix products: default

locale:
[1] LC_COLLATE=English_United States.1252 
[2] LC_CTYPE=English_United States.1252   
[3] LC_MONETARY=English_United States.1252
[4] LC_NUMERIC=C                          
[5] LC_TIME=English_United States.1252    

attached base packages:
[1] stats     graphics  grDevices utils     datasets 
[6] methods   base     

loaded via a namespace (and not attached):
[1] compiler_3.5.1 tools_3.5.1    yaml_2.2.0  

Answer 1

Я не могу воспроизвести эту проблему:

table_A1 <- read.table(header = FALSE, text = "2  0.562  0.563
3  0.281  0.844
4  0.105  0.949
5  0.035  0.984")
names(table_A1) <- c("x", "P(X=x)", "P(X\u2264x)")
print(table_A1)
#>   x P(X=x) P(X≤x)
#> 1 2  0.562  0.563
#> 2 3  0.281  0.844
#> 3 4  0.105  0.949
#> 4 5  0.035  0.984
# Try @hrbrmstr's way
colnames(mtcars)[1] <- as.character(expression("P(X\u2264x)"))
head(mtcars[,1:3])
#>                   P(X≤x) cyl disp
#> Mazda RX4           21.0   6  160
#> Mazda RX4 Wag       21.0   6  160
#> Datsun 710          22.8   4  108
#> Hornet 4 Drive      21.4   6  258
#> Hornet Sportabout   18.7   8  360
#> Valiant             18.1   6  225
# Works
# Try how you're doing it
colnames(mtcars)[1] <- "P(X\u2264x)"
head(mtcars[,1:3])
#>                   P(X≤x) cyl disp
#> Mazda RX4           21.0   6  160
#> Mazda RX4 Wag       21.0   6  160
#> Datsun 710          22.8   4  108
#> Hornet 4 Drive      21.4   6  258
#> Hornet Sportabout   18.7   8  360
#> Valiant             18.1   6  225
# works

^{Создано в 2018-11-08 пакетом представ. (v0.2.1)}

Answer 2

colnames(mtcars)[1] <- as.character(expression("P(X\u2264x)"))
head(mtcars[,1:3])
##                   P(X≤x) cyl disp
## Mazda RX4           21.0   6  160
## Mazda RX4 Wag       21.0   6  160
## Datsun 710          22.8   4  108
## Hornet 4 Drive      21.4   6  258
## Hornet Sportabout   18.7   8  360
## Valiant             18.1   6  225