Dear all,

When I use a unicode symbol in the labels for a factor object, the 
corresponding level does not display as expected. However, using levels() on 
the factor returns the desired output. I noticed the discrepancy when the 
legend labels from a call to ggplot() did not display the desired symbol, but 
an explicitly built legend using the same labels did. 

Example (I am trying to get the less than or equal to symbol): 

> .df <- data.frame(afp = c(0,0,1,1), time=c(0,2,0,1), surv=c(1, 0.5, 1, 0.4))
> afpLabels <- c("AFP \u2264 16", "AFP > 16")
> afpStrata <- factor(.df$afp, labels=afpLabels)
> afpStrata
[1] AFP ? 16 AFP ? 16 AFP > 16 AFP > 16
Levels: AFP = 16 AFP > 16

The first level is reported as "AFP = 16".

> levels(afpStrata)
[1] "AFP ? 16" "AFP > 16"
> 

The desired result is produced with levels().


The code below shows this issue in context through calls to ggplot() if you 
don't mind loading all the libraries.

> library(ggplot2)
> library(gridExtra)
> library(plyr)
> 
> ggplot(.df, aes(time, surv)) + geom_step(aes(color = afpStrata), size = 1.0)  
> 
> ggplot(.df, aes(time, surv)) + geom_step(aes(color = afpStrata), size = 1.0)  
> +  
+ scale_colour_hue(breaks=afpLabels, labels=afpLabels)
> 

I am running a pre-compiled version of R on Windows 7 (64-bit).
> sessionInfo()
R version 2.15.1 (2012-06-22)
Platform: x86_64-pc-mingw32/x64 (64-bit)

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] grid      stats     graphics  grDevices utils     datasets  methods  
[8] base     

other attached packages:
[1] plyr_1.7.1    gridExtra_0.9 ggplot2_0.9.1

loaded via a namespace (and not attached):
 [1] colorspace_1.1-1   dichromat_1.2-4    digest_0.5.2       labeling_0.1      
 [5] MASS_7.3-18        memoise_0.1        munsell_0.3        proto_0.3-9.2     
 [9] RColorBrewer_1.0-5 reshape2_1.2.1     scales_0.2.1       stringr_0.6.1     
[13] tools_2.15.1      
> 

Sincerely,
Kristin Berry

        [[alternative HTML version deleted]]

______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to