R - แผนภูมิวงกลม
R ภาษาการเขียนโปรแกรมมีไลบรารีมากมายสำหรับสร้างแผนภูมิและกราฟ แผนภูมิวงกลมคือการแสดงค่าเป็นส่วนของวงกลมที่มีสีต่างกัน ชิ้นส่วนจะมีป้ายกำกับและตัวเลขที่ตรงกับแต่ละชิ้นจะแสดงในแผนภูมิด้วย
ใน R แผนภูมิวงกลมถูกสร้างขึ้นโดยใช้ pie()ฟังก์ชันที่รับตัวเลขบวกเป็นอินพุตเวกเตอร์ พารามิเตอร์เพิ่มเติมใช้เพื่อควบคุมป้ายกำกับสีชื่อเรื่อง ฯลฯ
ไวยากรณ์
ไวยากรณ์พื้นฐานสำหรับการสร้างแผนภูมิวงกลมโดยใช้ R คือ -
pie(x, labels, radius, main, col, clockwise)
ต่อไปนี้เป็นคำอธิบายของพารามิเตอร์ที่ใช้ -
x คือเวกเตอร์ที่มีค่าตัวเลขที่ใช้ในแผนภูมิวงกลม
labels ใช้เพื่อให้คำอธิบายกับชิ้นส่วน
radius แสดงรัศมีของวงกลมของแผนภูมิวงกลม (ค่าระหว่าง −1 ถึง +1)
main ระบุชื่อของแผนภูมิ
col แสดงจานสี
clockwise เป็นค่าตรรกะที่ระบุว่าชิ้นส่วนถูกวาดตามเข็มนาฬิกาหรือทวนเข็มนาฬิกา
ตัวอย่าง
แผนภูมิวงกลมที่เรียบง่ายมากถูกสร้างขึ้นโดยใช้เพียงเวกเตอร์อินพุตและป้ายกำกับ สคริปต์ด้านล่างจะสร้างและบันทึกแผนภูมิวงกลมในไดเรกทอรีการทำงาน R ปัจจุบัน
# Create data for the graph.
x <- c(21, 62, 10, 53)
labels <- c("London", "New York", "Singapore", "Mumbai")
# Give the chart file a name.
png(file = "city.png")
# Plot the chart.
pie(x,labels)
# Save the file.
dev.off()
เมื่อเรารันโค้ดด้านบนจะให้ผลลัพธ์ดังนี้ -
ชื่อแผนภูมิวงกลมและสี
เราสามารถขยายคุณสมบัติของแผนภูมิได้โดยการเพิ่มพารามิเตอร์ให้กับฟังก์ชัน เราจะใช้พารามิเตอร์main เพื่อเพิ่มชื่อในแผนภูมิและพารามิเตอร์อื่นคือ colซึ่งจะใช้ประโยชน์จากพาเลทสีรุ้งในขณะที่วาดแผนภูมิ ความยาวของพาเลทควรเท่ากับจำนวนค่าที่เรามีสำหรับแผนภูมิ ดังนั้นเราจึงใช้ความยาว (x)
ตัวอย่าง
สคริปต์ด้านล่างจะสร้างและบันทึกแผนภูมิวงกลมในไดเรกทอรีการทำงาน R ปัจจุบัน
# Create data for the graph.
x <- c(21, 62, 10, 53)
labels <- c("London", "New York", "Singapore", "Mumbai")
# Give the chart file a name.
png(file = "city_title_colours.jpg")
# Plot the chart with title and rainbow color pallet.
pie(x, labels, main = "City pie chart", col = rainbow(length(x)))
# Save the file.
dev.off()
เมื่อเรารันโค้ดด้านบนจะให้ผลลัพธ์ดังนี้ -
Slice Percentages และ Chart Legend
เราสามารถเพิ่มเปอร์เซ็นต์สไลซ์และคำอธิบายแผนภูมิได้โดยการสร้างตัวแปรแผนภูมิเพิ่มเติม
# Create data for the graph.
x <- c(21, 62, 10,53)
labels <- c("London","New York","Singapore","Mumbai")
piepercent<- round(100*x/sum(x), 1)
# Give the chart file a name.
png(file = "city_percentage_legends.jpg")
# Plot the chart.
pie(x, labels = piepercent, main = "City pie chart",col = rainbow(length(x)))
legend("topright", c("London","New York","Singapore","Mumbai"), cex = 0.8,
fill = rainbow(length(x)))
# Save the file.
dev.off()
เมื่อเรารันโค้ดด้านบนจะให้ผลลัพธ์ดังนี้ -
แผนภูมิวงกลม 3 มิติ
แผนภูมิวงกลมที่มี 3 มิติสามารถวาดได้โดยใช้แพ็คเกจเพิ่มเติม แพคเกจplotrix มีฟังก์ชันที่เรียกว่า pie3D() ที่ใช้สำหรับสิ่งนี้
# Get the library.
library(plotrix)
# Create data for the graph.
x <- c(21, 62, 10,53)
lbl <- c("London","New York","Singapore","Mumbai")
# Give the chart file a name.
png(file = "3d_pie_chart.jpg")
# Plot the chart.
pie3D(x,labels = lbl,explode = 0.1, main = "Pie Chart of Countries ")
# Save the file.
dev.off()
เมื่อเรารันโค้ดด้านบนจะให้ผลลัพธ์ดังนี้ -