Warning: file_get_contents(/data/phpspider/zhask/data//catemap/9/csharp-4.0/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
如何在R中创建可视化数据表以快速直观地筛选数据_R - Fatal编程技术网

如何在R中创建可视化数据表以快速直观地筛选数据

如何在R中创建可视化数据表以快速直观地筛选数据,r,R,我有以下txt格式的数据集: Column1 Column2 Column3 etc A1 5 7 A2 4 2 .. A12 5 4 B1 2 9 B2 2 8 .. B12 11 5 .. H1 0 3 H2 4 54 .. H12 4 31 我想创建一个可视化数据表,

我有以下txt格式的数据集:

        Column1 Column2 Column3 etc
        A1 5 7
        A2 4 2
        ..
        A12 5 4
        B1 2 9
        B2 2 8
        ..
        B12 11 5
        ..
        H1 0 3
        H2 4 54
        ..
        H12 4 31

我想创建一个可视化数据表,其中a到H行由12列组成,每个单元格填充相应的值(第2列或第3列的值),并根据其值使用渐变色(如热图)。最好的方法是什么

以下是一种使用
dplyr
tidyr
进行数据争用和
gt
进行可视化的方法:

请注意,“
”Column2”是在`
values\u中指定的,但是您可以将其更改为可视化其他列

library(dplyr)
library(tidyr)
library(dt)
library(scales)
data %>% 
  separate(1, into = c("Column1","Name"),
           sep = "(?<=[A-Z])(?=\\d)") %>%
  pivot_wider(id_cols = 1, names_from = "Name",
              values_from = "Column2") %>%
  gt() %>%
  data_color(columns = 2:13, 
             colors = col_numeric(palette = c("green","yellow","red"),
                                  domain = c(10,1000)))
库(dplyr)
图书馆(tidyr)
图书馆(dt)
图书馆(比例尺)
数据%>%
将(1)分隔为=c(“第1列”、“名称”),

sep=“(?以下是一种使用
dplyr
tidyr
进行数据争用和
gt
进行可视化的方法:

请注意,“
”Column2”是在`
values\u中指定的,但是您可以将其更改为可视化其他列

library(dplyr)
library(tidyr)
library(dt)
library(scales)
data %>% 
  separate(1, into = c("Column1","Name"),
           sep = "(?<=[A-Z])(?=\\d)") %>%
  pivot_wider(id_cols = 1, names_from = "Name",
              values_from = "Column2") %>%
  gt() %>%
  data_color(columns = 2:13, 
             colors = col_numeric(palette = c("green","yellow","red"),
                                  domain = c(10,1000)))
库(dplyr)
图书馆(tidyr)
图书馆(dt)
图书馆(比例尺)
数据%>%
将(1)分隔为=c(“第1列”、“名称”),

九月=”(?太好了!这正是我要找的!我的问题的一个复杂性-有时这些文本文件会缺少某些单元格,例如,一个文件可能只包含包含A2-->H2和A3--H3列值的单元格。在这种情况下,空单元格id就像显示空/非彩色单元格一样。使用此代码,我得到:错误:给定的所有列或行索引必须存在于
数据\u tbl
中。我想它在寻找一个完全填充的表,其中所有值都存在于A1--H12中。是否可以将其修改为仍然显示“未完成”/partial tables?非常感谢!是的,可以很容易地修改此方法,以将
NA
替换为
0
。例如,如果您使用
dput(数据)提供数据样本
作为对您原始问题的编辑,我可以提供帮助。太好了!这正是我要找的!我的问题的一个复杂问题-有时这些文本文件会缺少某些单元格,例如,一个文件可能只有这些单元格包含A2-->H2和A3--H3列值。在这种情况下,对于空单元格id就像显示空单元格一样/非彩色单元格。使用此代码,我得到:错误:给定的所有列或行索引必须存在于
数据中。\u tbl
。我想它是在寻找一个包含所有值的完全填充表A1--H12。是否可以修改为仍然显示“不完整”/partial tables?非常感谢!是的,这种方法可以很容易地修改,例如用
0
替换
NA
。如果您提供一个带有
dput(数据)
的数据样本,作为对原始问题的编辑,我可以提供帮助。