-1
A
回答
1
想通了!
win.prob <- .67
heatmap <- matrix(ifelse(runif(400, min = 0, max = 1)<=win.prob,1,0), nrow = 20)
heatmap.m <- melt(heatmap) %>% mutate("Majority" = ifelse(value>0.5,"Democratic","Republican"))
library(reshape)
ggplot(heatmap.m, aes(x = X1, y = X2,fill=Majority)) +
geom_tile(color = "black") +
theme_void() +
scale_fill_manual(values=c("Democratic" = "blue","Republican"="red"))
相關問題
- 1. 概率表示法
- 2. 顯示在彩盒div的概率
- 3. 在C++中表示概率
- 4. 概率狀態表示的
- 5. 概率和頻率
- 6. 概率使用rand.Next()
- 7. 非線性概率的線性概率
- 8. 計算概率在概率樹
- 9. XML顯示概述
- 10. 概率HIRE- ASISTANT
- 11. 概率組合
- 12. 概率計算
- 13. 計算概率
- 14. 概率模型
- 15. 概率實現
- 16. 概率計算
- 17. 數學概率
- 18. 概率函數 -
- 19. 概率懷疑
- 20. python概率
- 21. Python中,概率
- 22. 概率優化
- 23. Dice概率
- 24. 超時概率
- 25. 查找概率
- 26. JAVA:與概率
- 27. 事件概率
- 28. 概率算法
- 29. Random.Next()的概率
- 30. Android AlertDialog概率