Радарная диаграмма в R - значения переменных не видны на радиолокационной диаграмме и слишком длинные метки - PullRequest
Новая
       25

Радарная диаграмма в R - значения переменных не видны на радиолокационной диаграмме и слишком длинные метки

0 голосов
/ 07 июня 2019

Я пытаюсь создать радиолокационную диаграмму в R. Как устранить эти 2 проблемы?

1- Значения переменных не отображаются

2- Метки переменных расположены друг над другом

И еще один вопрос:

3 - Как настроить градиентный цветной фон (от темно-серого до светло-серого) на моем графике?

Мои данные: 

> dput(df_radar_final_new)
structure(list(`My input is well received in this clinical area.` = 58, 
    `In this clinical area, it is difficult to speak up when I perceive a problem with patient care.` = 46, 
    `Disagreements in this clinical area are resolved appropriately (i.e., not who is right but what is best for the patient).` = 69, 
    `I have the support I need from my colleagues and other staff groups to care for patients.` = 32, 
    `It is easy for staff here to ask questions when there is something that they do not understand.` = 63), row.names = 1L, class = "data.frame")

Мой код: 

install.packages("fmsb")
library(fmsb)

par(mar=c(1, 2, 2, 1)) #decrease default margin
radarchart(df_radar_final_new, maxmin=FALSE)

Токовый выход: enter image description here

Изображение 1 - После выполнения кода, указанного ниже: enter image description here

Изображение 2 - Что я хотел бы иметь: enter image description here

1 Ответ

0 голосов
/ 07 июня 2019

Вы можете разбить текст, написав \n после слов, чтобы разбить текст. 

df <- structure(list(`My input is well received in this clinical area.` = 58, 
               `In this clinical area\n, it is difficult to speak up\n when I perceive a problem with patient care.` = 46, 
               `Disagreements in this\n clinical area are resolved appropriately\n (i.e., not who is right but what is best for the patient).` = 69, 
               `I have the support\n I need from my colleagues and other\n staff groups to care for patients.` = 32, 
               `It is easy for staff here\n to ask questions when there\n is something that they do\n not understand.` = 63), row.names = 1L, class = "data.frame")

df

library(fmsb)

par(mar=c(1, 2, 2, 1)) #decrease default margin
radarchart(df, maxmin=FALSE, axistype=3, pty=32, plty=1, axislabcol="red", na.itp=FALSE,
           title="(no points, axis=3, na.itp=FALSE)")

Я немного поиграл, вам нужно изменить axislabcol, чтобы увидеть ваши значения.Вот документация: https://rdrr.io/cran/fmsb/man/radarchart.html => Мне не удалось найти способ изменить цвет фона.

...