小编zin*_*eda的帖子

这是我的 Hugo 博客上的存储库：

我想在帖子中插入包含以下文本的图像：

![Scenario 1: Across columns](content/post/image/across_column.png)

但是，它没有出现，并且给出了 404 错误 - 找不到页面。

我在这里做错了什么？

我有一个数据集，如下所示：

data <- tribble(
  ~top_1, ~top_2, ~top_3,
  "A",     "B",    "C",
  "B",     "B",    "B",   
  "C",     "B",    "C",
  "A",     "B",    "B",
  "A",     "A",    "A",
  "B",     "B",    "A",
  "C",     "A",    "C",
  "A",     "A",    "A",
  "A",     "C",    "B",
  "B",     "B",    "C",
)

现在，我想为每一列计数不同的行，并有一个新的数据集，如下所示：

new_data <- tribble(
  ~product, ~top_1, ~top_2, ~top_3,
     "A",    .50,    .30,     .30,
     "B",    .30,    .60,     .30,
     "C",    .20,    .10,     .40,
)

您能帮我创建此数据吗？

我有一个数据集，如下所示：

data <- tribble(
  ~id,     ~click,  ~engagement,
   1,         1,          0,
   2,         2,          3,         
   3,         3,          5,
   4,         4,          6, 
   5,         5,          2,
   6,         3,          4,
   7,         8,          7,
   8,         6,          1,
   9,         7,          6,
  10,         7,          3,
)

我想要的数据是这样的：

new_data <- tribble(
  ~total_click,  ~total_engagement, ~percantage_click, ~percantage_engagement, 
     46,              37,              0.5542169,          0.4457831,
)

我可以通过这样的编码来获得total_click和total_engagement：

data %>% 
  summarise(total_click = sum(click), total_engagement = sum(engagement)) 

如何获得百分比？

我想在清楚地计数后取平均值。

这是我当前的查询：

SELECT product_id,
         COUNT(DISTINCT shop_id) AS shops,
         year,
         month,
         day
FROM X
GROUP BY  product_id, year, month, day

但是现在，我想取商店的平均值。我试过这样的事情，但我收到这个错误：invalidrequestexception

SELECT product_id,
         AVG(COUNT(DISTINCT shop_id) AS shops) as avg_shops,
         year,
         month,
         day
FROM X
GROUP BY  product_id, year, month, day

我有一个数据集，如下所示：

df_A <- tribble(
      ~shop_name,      ~id,      
        "A",         "1, 4, 3", 
        "B",         "4, 6",   
        "C",         "3, 5",   
        "D",         "6, 2, 3", 
)

现在，我想按向量中的每个唯一 id 对数据进行分组，然后相应地对它们进行计数。你觉得可行吗？如何操作数据以获得我想要的数据？

desired <- tribble(
  ~id,   ~counted_id,      
  "1",      1, 
  "2",      1,   
  "3",      3,   
  "4",      2, 
  "5",      1,   
  "6",      2, 
)