Создание диаграммы термометра в R

Question

Привет Я пытаюсь создать график термометра в R. Я не мог найти никаких примеров для графика термометра. Может ли кто-нибудь показать мне, как это можно реализовать в R?

Этот график будет использован для отображения объема собранного фонда во время мероприятия. Пример будет высоко оценен.

Answer 1

Посмотрите ?symbols

# fundraising objective 
z <- 1000 
# amount gathered 
y <- 600 

symbols(1, thermometers = cbind(.5, 1, y/z), fg = 2, 
     xlab = NA, ylab = NA, axes = F, main = "Fundraising event") 
text(1, paste0(y, "$", "/", z, "$"), pos = 2, offset = 3) 
text(1, paste0(y/z*100, "%"), pos = 1, offset = 3)