กำหนดฟังก์ชัน theme ของคุณเอง
ในวิดีโอ คุณได้เห็นวิธีลดการพิมพ์โค้ดซ้ำๆ ด้วยการแทนที่โค้ดบางส่วนด้วยการเรียกฟังก์ชัน ตอนนี้เมื่อรู้วิธีกำหนดฟังก์ชันแล้ว ลองนำความรู้นี้ไปใช้เพื่อให้การเรียก theme() สองครั้งก่อนหน้านี้สามารถนำกลับมาใช้ได้ใหม่
แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร
การสื่อสารด้วยข้อมูลใน Tidyverse
คำแนะนำการฝึกหัด
- โดยใช้ความรู้เรื่องการกำหนดฟังก์ชัน ให้สร้างฟังก์ชันชื่อ
theme_ilo()เพื่อรวบรวมการตั้งค่า theme ทั้งหมดไว้ด้วยกัน - ส่วน function body ควรมีการเรียก
theme()ทั้งสองครั้งที่ปกติจะใช้กับออบเจกต์พล็อตโดยตรง ได้แก่theme_minimal()+ ฟังก์ชันtheme()ที่ปรับแต่งเอง - คัดลอกสิ่งที่ทำไว้ก่อนหน้านี้ลงในฟังก์ชัน
theme_ilo()โดยใช้การตั้งค่าtheme()ที่ระบุไว้ในโค้ดตัวอย่าง
แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ
ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์
# For a starter, let's look at what you did before: adding various theme calls to your plot object
ilo_plot +
theme_minimal() +
theme(
text = element_text(family = "Bookman", color = "gray25"),
plot.subtitle = element_text(size = 12),
plot.caption = element_text(color = "gray30"),
plot.background = element_rect(fill = "gray95"),
plot.margin = unit(c(5, 10, 5, 10), units = "mm")
)
# Define your own theme function below
theme_ilo <- function() {
___() +
___(
___
)
}