了解Shiny应用程序及其链接中的度量指标

时间:2017-12-31 16:28:22

标签: r shiny

我有一个类似于这个的部署Shiny应用程序: https://menoretjl.shinyapps.io/MicroAnalysis/

我想跟随用户对应用的使用情况,因此我使用了Shiny信息中心中提供的衡量指标:主要是'用法' (在帐户/使用中),'连接'和'内存使用情况' (在应用程序/指标中)。

以下是一天的三个指标。它似乎与它们无关:在20:00有一个单一和短连接。或者有更多的内存使用,甚至更多的使用(今天超过一小时的使用!)。

基于这些事实,我的问题是:

  • 我真的不明白这些指标的含义。特别是使用指标,或者这是结算计划的基础;

  • 我真的不明白这三个指标之间的(第一个逻辑?!)链接。

Connection

Usage

1 个答案:

答案 0 :(得分:1)

这对我有用。您必须已连接到RStudio |工具|全局选项|发布中的相关Shinyapps.io帐户。

# download metrics from shinyapps.io

library(tidyverse)
library(lubridate)

# http://docs.rstudio.com/shinyapps.io/metrics.html#ApplicationMetrics
df <- rsconnect::showMetrics("container_status",
                             c("connect_count", 
                               "connect_procs"),
                             appName="pasture_embed",
                             server="shinyapps.io",
                             from="12w",
                             interval="1m"
                             ) 

df1 <- df %>% 
  mutate(date=as_datetime(timestamp)) %>% 
  select(-timestamp) %>% 
  arrange(date) %>% 
  mutate(
    n_count=cumsum(connect_count),
    n_procs=cumsum(connect_procs),
    new_connect=case_when(
      connect_count>lag(connect_count,1) ~ connect_count-lag(connect_count,1),
      TRUE ~ 0),
    n_connect=cumsum(new_connect) # approximate
  ) %>% 
  filter(n_count>0)

df2 <- df1 %>%  
  select(n_connect, date) %>% 
  gather(key="key", value="value", -date)

p2 <- ggplot(df2) +
  labs(title="Cumulative Connections", x="", y="") +
  geom_line(aes(x=date, y=value, colour=key)) +
  facet_wrap(~key)

print(p2)