我試圖在ggsurvplot物件的分層標簽中顯示一個大于號。我在一個不同的繪圖中生成了類似的東西(如下圖):
Functional than sign
以上圖片的功能代碼
kmcurve_spd <- ggsurvplot(km_fitp1_spd,
palette = c("#202960"/span>。 "#8CC63E"/span>。 "#5B9BD5", "#8f94af"),
xlab = "時間(月)",
圖例。 實驗室 = c(paste0("< 500毫米","u00b2")。 paste0("u2265","500",
" or < 1000毫米","u00b2")。 paste0("u2265", "1000 or < 1500毫米","u00b2"),
paste0("u2265"。 "1500 mmu00b2")))
通常情況下,我在字串中顯示>符號沒有問題。然而,當我試圖使用">"的">1 Prior Progressions"作為標簽時,我一直遇到以下警告和錯誤代碼:
Warning in grid.Call(C_textBounds, as. graphicsAnnot(x$label)。 x$x, x$y, 。
在Windows字體資料庫中找不到字體家族。
警告 in grid.Call(C_textBounds, as. graphicsAnnot(x$label)。 x$x, x$y, 。
在Windows字體資料庫中沒有找到字體家族。
錯誤: gridtext遇到了一個尚不支持的標簽:<blockquote>。
目前只有非常有限的標簽被支持。
下面是我導致錯誤的代碼的一個截斷樣本。
出錯的代碼
kmcurve_pd <- ggsurvplot(km_fitp1_pd,
palette = c("#202960"/span>。 "#8CC63E"),
xlab = "時間(月)",
圖例。 實驗室 = c(paste0("u2265"/span>。 "1 Prior Progression"), "> 1先前的進展"))
#這也產生了同樣的錯誤。
kmcurve_pd <- ggsurvplot(/span>km_fitp1_pd,
palette = c("#202960"/span>。 "#8CC63E"),
xlab = "時間(月)",
圖例。 實驗室 = c(paste0("u2265"/span>。 "1 Prior Progression"),
paste0("> ","1 Prior Progression")))。
然而,當我把legend.labs向量替換成unicode和字串的組合時,我能夠運行代碼,這使我得出結論,>是導致錯誤的。我通常使用這個網站來快速搜索unicode,并找到了>符號的unicode。
帶有不正確符號的代碼
kmcurve_pd <- ggsurvplot(km_fitp1_pd,
palette = c("#202960"/span>。 "#8CC63E"),
xlab = "時間(月)",
圖例。 labs = c(paste0("u2264"/span>。 "1 Prior Progression")。 paste0("u00e3",)
"1 Prior Progression")))
是否有任何變通方法,使我能讓>正常顯示?我真的不想只使用文字,因為我的其他情節都使用了符號,它看起來會不合適。如果KM擬合物件的rerex會有幫助,我可以提供。謝謝!
uj5u.com熱心網友回復:
根據@JosefZ的建議,我利用了右箭頭的unicode來生成,效果很好。下面是包含解決方案的最終代碼:
kmcurve_pd <- ggsurvplot(km_fitp1_pd,
palette = c("#202960"/span>。 "#8CC63E"),
xlab = "時間(月)",
圖例。 labs = c(paste0("u2264"/span>。 "1 Prior Progression"),
paste0("u02C3"/span>。 "1 Prior Progression"))
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/318944.html
標籤:
下一篇:按平均值排序的散點圖

