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

Our Shangri-La
Ico64
Kittisakdi Choomalee

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

อ่าน: 5269
ความเห็น: 1

ก้าวย่าง ทางเดิน ลืมเลือนคืนวัน ดั้นด้นไป: เที่ยวบาร์กับ 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

บันทึกอื่นๆ

ความเห็น

Ico48
Thanos [IP: 49.15.244.16]
18 มกราคม 2562 13:48
#108407

Must be like to given this amazing article here this is the nice way to getting the remember passwords in egde here and save the all process to secure the all data and web site.

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

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