虽然很久之前就开始学习用R了,也一直都知道统计之都,但是一直都没有注册成为会员。工作后基本用不上R了,但是作为R的老用户也不愿意丢掉这一项技能,就还在工作之余用R做点小玩意。
这是自己从2月份开始开发运营的一个关于日本疫情情况的shiny应用,现在人懒了已经不继续开发迭代了不过依然在每日更新数据持续运营着。截止目前的页面访问次数已经超过1300万了。
之前还写了一篇开发这个dashboard的流水账文章,有点长就放在了Github里,有兴趣的论友可以到下面的Github链接查看: https://github.com/swsoyee/2019-ncov-japan/blob/doc/www/doc/%E7%94%A8shiny%E5%92%8Cecharts4r%E5%88%B6%E4%BD%9C%E4%B8%80%E4%B8%AACOVID-19%E7%9A%84dashboard.md
InfinityLoop 还🉑以使用Appsilon,添加更佳视觉效果和方便使用
赞,说是流水帐但作为一个完整的项目开发记录来说从构思到实施都很完备,参考价值很高,建议投稿主站
tctcab
nan.xiao
感谢二位大佬的赞赏,待我下班后看看如何投稿主站☺️
居然还有style = "bootstrap"这种“暗器”,一直发愁DT的默认Style和bootstrap不太搭配,又懒得弄css自己调整,后续尝试调试一下👍🏼
style = "bootstrap"
这是我近期见到最好的 shiny app,说是企业级产品也不为过,同楼上建议投稿主站。
简单评价下:对各类 widget 的运用和定制恰到好处,既让人眼前一亮又没有 surprise,元素的布局和配色也下了功夫。对依赖的引入比较谨慎,加载性能也优化得不错。
DT::datatable() 有个参数 style = "bootstrap" 或许能让表格看起来美观一些,不过这会引入额外的 CSS 依赖。
DT::datatable()
InfinityLoop
又仔细把玩了一下,功能和美观性都好喜欢,配色看起来真是赏心悦目。
另外投稿指南看这里 https://cosx.org/contribute/
@InfinityLoop 强烈建议投稿主站,统计之都微信公众号目前约6万粉丝,可以让更多人学习到这么漂亮的作品,主站的投稿是以 Github PR 的方式,就是一个 md 文件,非常便捷。期待ing!
ryo 确实很酷炫,就是不知道如何获取源代码,然后换成自己的数据体验下。
chuxinyuan 所有源码包括数据都在Github上 https://github.com/swsoyee/2019-ncov-japan 因为经过的高度定制化的,所以通用性比较低,很难更换数据源(其劳力还不如重新开发一个新的了)。
超级炫酷!!! 有个问题想请教一下,为什么进入首页时,首页的的四项总指标(shinydashboard::valueBox())中的数字会有迅速滚拨加载的动作呢?秘密在哪呢?
AlphaDo 秘密在这里 https://github.com/JohnCoene/countup 其实R+htmlwidgets理论上可以把大多数JavaScript写的效果或者插件进行移植的,如果有兴趣也可以自己整几个小包出来,做这种小项目开发还挺有趣的
InfinityLoop wow,又get到一个有趣的小插件!感谢呀,受教了,我会试着多多拓展的~
被主站投稿安利过来的,做得非常棒!