막대 그래프를 만들려고합니다. 제한을 (0,7)로 설정하면 막대가 나타납니다. 하지만 하한값은 0이 아닌 1로 설정하고 싶습니다. 하한값을 1로 설정하면 막대가 나타나지 않습니다. 다음과 같은 오류 메시지가 나타납니다.
Removed 8 rows containing missing values (geom_bar).
한계를 어떻게 설정하든 상관 없습니다. 다음 옵션을 모두 사용했습니다.
ylim(1, 7)
scale_y_continuous(limits = c(1, 7))
누구든지 내가 이것을 고칠 수 있는지 알고 있습니까?
나는 이와 같은 그래프를 원하지만 하단 y 축 레이블로 1을 사용하면 모든 막대가 1 씩 아래로 이동한다는 의미입니다.
그래프의 전체 코드는 다음과 같습니다.
full %>%
ggplot(aes(x = order, y = mean)) +
geom_bar(stat = "identity", fill = "003900", width = 0.5, position = position_dodge()) +
geom_errorbar(aes(ymin = mean - se, ymax = mean + se), width = .2, position = position_dodge(.9)) +
geom_text(aes(label = round(mean, digits =1)), position = position_dodge(width=1.0), vjust = -4.0, size = 3) +
#facet_wrap(~names) +
labs(title = "Behavioral intentions in response to each message") +
# ylim(0, 7) +
scale_y_continuous(limits = c(1, 7)) +
theme(axis.text = element_text(size = 7)) +
xlab("Message") +
ylab("Behavioral intentions")
재현 가능한 데이터는 다음과 같습니다.
structure(list(message = c("a", "e", "h", "m", "convince_animals",
"convince_environment", "convince_health", "convince_money"),
mean = c(3.1038961038961, 3.21052631578947, 3.56, 2.7972972972973,
4.19512195121951, 4.18536585365854, 5.65365853658537, 4.93658536585366
), se = c(0.208814981196227, 0.204609846510406, 0.220760356801522,
0.20542415978608, 0.121188432228325, 0.11075110910238, 0.0896896391724367,
0.120394657272105), type = c("Behavioral Intentions", "Behavioral Intentions",
"Behavioral Intentions", "Behavioral Intentions", "Expected Behavior",
"Expected Behavior", "Expected Behavior", "Expected Behavior"
), names = c("Animals", "Environment", "Health", "Money",
"Animals", "Environment", "Health", "Money"), order = c(1,
3, 5, 7, 2, 4, 6, 8)), row.names = c(NA, -8L), class = c("tbl_df",
"tbl", "data.frame"))
제한을 설정하여 데이터를 잃어 버리고 플롯을 망치고있는 것 같습니다. coord_cartesian()
대신 ylim()
데이터를 '확대' 하는 데 사용할 수 있습니다 . 자세한 내용은 https://stackoverflow.com/a/25685952/12957340 및 / 또는 ggplot2 책의 160 페이지를 참조하십시오 .
full %>%
ggplot(aes(x = order, y = mean)) +
geom_bar(stat = "identity", fill = "003900", width = 0.5, position = position_dodge()) +
geom_errorbar(aes(ymin = mean - se, ymax = mean + se), width = .2, position = position_dodge(.9)) +
geom_text(aes(label = round(mean, digits =1)), position = position_dodge(width=1.0), vjust = -4.0, size = 3) +
#facet_wrap(~names) +
labs(title = "Behavioral intentions in response to each message") +
coord_cartesian(ylim = c(1, 7)) +
theme(axis.text = element_text(size = 7)) +
xlab("Message") +
ylab("Behavioral intentions")
이 기사는 인터넷에서 수집됩니다. 재 인쇄 할 때 출처를 알려주십시오.
침해가 발생한 경우 연락 주시기 바랍니다[email protected] 삭제
몇 마디 만하겠습니다