虽然很久之前就开始学习用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

    这是我近期见到最好的 shiny app，说是企业级产品也不为过，同楼上建议投稿主站。

    简单评价下：对各类 widget 的运用和定制恰到好处，既让人眼前一亮又没有 surprise，元素的布局和配色也下了功夫。对依赖的引入比较谨慎，加载性能也优化得不错。

    DT::datatable() 有个参数 style = "bootstrap" 或许能让表格看起来美观一些，不过这会引入额外的 CSS 依赖。

      tctcab

      nan.xiao

      感谢二位大佬的赞赏，待我下班后看看如何投稿主站☺️

      居然还有style = "bootstrap"这种“暗器”，一直发愁DT的默认Style和bootstrap不太搭配，又懒得弄css自己调整，后续尝试调试一下👍🏼

            @InfinityLoop 强烈建议投稿主站，统计之都微信公众号目前约6万粉丝，可以让更多人学习到这么漂亮的作品，主站的投稿是以 Github PR 的方式，就是一个 md 文件，非常便捷。期待ing!

            2 个月 后
            1 个月 后

            超级炫酷！！！
            有个问题想请教一下，为什么进入首页时，首页的的四项总指标（shinydashboard::valueBox()）中的数字会有迅速滚拨加载的动作呢？秘密在哪呢？

              3 个月 后

              支持支持，想起了以前用Echarts做可视化的毕设时光

              • ryo 回复了此帖
                7 天 后

                benhaha 完全可以，不过可能后续会发文章（仅仅是可能），如果真的发了的话能注明引用就好了（如果没发的话请随意引个 GitHub 来源就好 w

                  话说看到个新闻说日本新冠数据是政府手动收集各个都道府数据加出来的，是真的吗……