使用ggplot翻转条形图上的数字

Question

我有一个我正在使用以下代码创建的情节：

count = 0
total = 0

# Input
start = int(float(input("1 of 2 - Enter Starting Loop Value: ")))
ending = int(float(input("2 of 2 - Enter Ending Loop Value: ")))

# for loop
for n in range(start, ending+1, 1):
  total = total + n
  count = count + 1
  print(n, "+ ", end="")
print("=", total)

print("\nLoop ran", count, "Times")

print("\n\n")

我得到以下情节：

我想在这里翻看数字。顶部显示的必须位于底部，反之亦然。

任何帮助将不胜感激。感谢。

Answer 1

尝试撤消图例：

p <- ggplot(flexbooks, aes(x=SchoolYear, y=Count,fill=Type)) +  
     geom_bar(stat="identity") +
     geom_text(data=flexbooks,aes(label=Count),vjust=-1,hjust=0.5) +
     guides(fill = guide_legend(reverse = TRUE))