นโยบายการจัดการความรู้ มหาวิทยาลัยสงขลานครินทร์ 1.ให้ใช้เครื่องมือการจัดการความรู้ผลักดัน คุณภาพคน และกระบวนทำงาน 2.ส่งเสริมการแลกเปลี่ยนประสบการณ์การทำงาน จากหน้างาน 3.ส่งเสริมให้มีเวทีเรียนรู้ร่วมกัน

Our Shangri-La
Ico64
Kittisakdi Choomalee

ภาควิชาเวชศาสตร์ชุมชน คณะแพทยศาสตร์ มหาวิทยาลัยสงขลานครินทร์
Network
Members · Following: 0 · Followed: 16

อ่าน: 5446
ความเห็น: 0

ก้าวย่าง ทางเดิน ลืมเลือนคืนวัน ดั้นด้นไป: เที่ยวบาร์กับ R กันเถอะ ตอนที่ ๔ - รุ้งกินน้ำ

กำหนดโทนสีรุ้งให้กับแท่งแผนภูมิ

หลังจากที่งดเที่ยวบาร์ซะหลายวัน เรากลับมาเที่ยวบาร์กันต่อนะครับ มีกี่บาร์ก็เที่ยวให้ฉาด

เอาแบบสั้น ๆ ไม่ต้องยาวนะครับ

สั้น ๆ ง่าย ๆ ได้ใจความ

ทบทวน

ในครั้งที่แล้วเราแต่งแต้มเติมสีให้กับแต่ละแท่งข้อมูลใน barchartกันไปแล้ว แต่วิธีในครั้งที่แล้วนั้นเราจะใช้การระบุสีไปเลยว่าจะให้แต่ละแท่งข้อมูลมีสีอะไร โดยจะกำหนดโดยการกำหนด "ชื่อสี" ไปเลยหรือจะใช้วิธีการกำหนดค่าสีด้วยตัวเลขแทนชื่อสี

แต่ทั้งนี้ทั้งนั้นการกำหนดสีโดยการใช้ตัวเลขแทนชื่อสีนั้นมีข้อจำกัดอยู่ กล่าวคือหากระบุตัวเลขแทนชื่อสีนั้น โปรแกรม R จะใช้ค่าตัวเลขแทนสีให้เฉพาะสีที่มีอยู่ในจานสีเริ่มต้นเท่านั้น ซึ่งค่าสีเริ่มต้นในจานสีจะมีเพียง ๘ สีเท่านั้น ซึ่งหากกำหนดตัวเลขให้มีค่ามากกว่า ๘ แล้ว ระบบก็จะแทนด้วยสีแรกในจานสีเริ่มต้น หรือจะใช้สีดำแทนตัวเลขที่ระบุค่าสี (ที่เกิน ๘)

ดังนั้นเราต้องทำการตั้งค่าจานสีของ R ให้รู้จักสีทั้งหมดที่โปรแกรม R รู้จักหรือคือ ๖๕๗ สี

การกำหนดสีด้วยการเขียนชื่อสี อาจจะไม่สะดวกสำหรับผู้ที่ไม่คุ้นชินกับโปรแกรม R หรือจำค่าสีไม่ได้ เขียนชื่อสีไม่ถูกต้อง หรือหากใช้เป็นตัวเลขแทนชื่อสีก็ไม่รู้ว่าสีที่ระบุเป็นสีอะไร

โปรแกรม R ได้อำนวยความสะดวกให้แก่ผู้ใช้โดยการกำหนดโทนสีต่าง ๆ เอาไว้ให้ผู้ใช้เลือกใช้ เพียงแต่จำนวนโทนสีนั้นไม่มากมาย

วันนี้เรามาทำความรู้จักกับโทนสีโทนหนึ่ง และเป็นโทนสีที่ผมใช้บ่อย ๆ ด้วยครับ

โทนสีที่ว่าคือ "รุ้ง"

นึกถึงรุ้งกินน้ำเข้าไว้ครับ

สีรุ้งมีสีอะไรบ้าง (ที่มองเห็นด้วยตาเปล่า) ก็เป็นสีนั้นครับ

หากผู้ใช้ต้องการจะเลือกใช้สีในโทนสีรุ้ง (rainbow) แล้วล่ะก้ให้ระบุด้วยฟังก์ชัน rainbow(n)

เมื่อ n = จำนวนสีที่ต้องการ

เมื่อใช้ฟังก์ชัน (หรือคำสั่ง) rainbow(n) โปรแกรม R จะไล่โทนสีรุ้งให้กับเรา ซึ่งสีหลัก ๆ ก็ ๗ สีดังที่เราคุ้นชินกันดีอยู่แล้ว

แดง แสด เหลือง เขียวก็มี น้ำเงินสวยดี คราม ม่วง

ยังจำกันได้ใช่ไหมครับ

จากตัวอย่างในบันทึกที่แล้วนะครับ เรามาเติมสีให้เป็นโทนสีรุ้งกันนะครับ

> a <- c(30,36,48,34,43,35,34,21,36)
> barplot(a, ylim=c(0,50), xlab="สัปดาห์", ylab="จำนวน (คน)", col=c(1,2,3,4,5,6,7,8,4))

ในครั้งที่แล้วเรากำหนดสีด้วยตัวเลขแทนชื่อสี col=c(1,2,3,4,5,6,7,8,4)

หากเราต้องการกำหนดให้ใช้โทนสีรุ้งเราก็แทนด้วย col=rainbow(9) เลข 9 ในวงเล็บก็คือจำนวนสี หรือจำนวนแท่งข้อมูลในแผนภูมินั่นเอง

ดูผลครับ

> a <- c(30,36,48,34,43,35,34,21,36)
> barplot(a, ylim=c(0,50), xlab="สัปดาห์", ylab="จำนวน (คน)", col=rainbow(9))

เป็นอย่างไรครับ ง่ายมั่ก ๆ ใช่ไหมครับ

 

เราเอง

น้ำตาดาว - บุษยา รังสี ข้อมูลจากวิดีโอ: "น้ำตาดาว" เป็นเพลงแรกที่ "บุษบา รังสี" ร้องกับทางวง "สุนทราภรณ์" และเป็นเพลงแรกที่ "อัดแผ่นเสียง" ตอนอายุ ๑๙ ปี

"บุษยา รังสี" คนที่ร้องเพลง "เขตรั้วสีบลู" ต้นฉบับ

หมวดหมู่บันทึก: บริการวิชาการ
สัญญาอนุญาต: ซีซี: แสดงที่มา-ไม่ใช้เพื่อการค้า-อนุญาตแบบเดียวกัน Cc-by-nc-sa
สร้าง: 06 พฤศจิกายน 2555 15:27 แก้ไข: 06 พฤศจิกายน 2555 15:27 [ แจ้งไม่เหมาะสม ]
ดอกไม้
สมาชิกที่ให้กำลังใจ: Ico24 ServiceMan, Ico24 scORpioN, และ 2 คนอื่น.
สมาชิกที่ให้กำลังใจ
 
Facebook
Twitter
Google

บันทึกอื่นๆ

ความเห็น

ไม่มีความเห็น

ร่วมแสดงความเห็นในหน้านี้

ชื่อ:
อีเมล:
IP แอดเดรส: 34.231.247.139
ข้อความ:  
เรียกเครื่องมือจัดการข้อความ
   
ยกเลิก หรือ