มีคนถามมาว่าช่วยทำตัวอย่างการใช้ Shiny กับแพ็คเกจ maemod ให้ดูหน่อย
ผมทำเป็นตัวอย่างง่ายๆให้ดูแล้วครับที่ https://github.com/slphyx/maemod/tree/master/inst/examples/shiny
อยากทดลองเล่นก็ลง maemod ก่อนหลังจากนั้นก็โหลดตัวอย่างไฟล์ที่ให้ไว้ใน link ทั้งสามไฟล์ โดยเก็บไว้ที่เดียวกัน จากนั้นก็เปิดไฟล์ ui.R หรือ server.R ใน rstudio แล้วก็ click ที่ปุ่ม Run App ได้เลยครับ
หลักการก็มีว่า สร้างตัว function ที่ส่งผ่านค่า parameters ครอบ maemod.ode อีกทีครับ จากนั้นก็เรียก function นี้จากในตัว server.R แล้วส่ง ค่าparameters แบบ reactive กลับเข้าไปที่ function ดูตัวอย่างจากในไฟล์ที่ทำเป็นตัวอย่างครับ