具有huxtable的相关矩阵中的大胆值

Question

如何在相关矩阵中加粗大于绝对值（例如0.3）的值。这就是我所在的位置。

library(huxtable) var1<-rnorm(100) var2<-rnorm(100) var3<-rnorm(100) var4<-rnorm(100) df<-data.frame(var1, var2, var3, var4) library(tidyverse) df %>% cor(.) %>% huxtable() %>% map_bold(., by_ranges(0.2, 0.4))

Answer 1

弄清楚了。

map_bold()将值映射到属性，中断点指定您希望新属性插入的位置，values()指示中断点序列中的属性。因此，在-0.2以下，粗体属性应为TRUE，在0.2以上，应为FALSE，然后在0.2以上，则应再次为TRUE。

此外，通过将map_bold的rows和cols参数保留为空，它适用于所有行和cols。

library(huxtable)
var1<-rnorm(100)
var2<-rnorm(100)
var3<-rnorm(100)
var4<-rnorm(100)
df<-data.frame(var1, var2, var3, var4)
library(tidyverse)
df %>% 
cor(.) %>% 
huxtable() %>% 
map_bold(., 
by_ranges(breaks=c(-0.2, 0.2), values=c(T, F, T)))