从数据集创建R中的矩阵

Question

我正试图将csv中提供给我们的数据转换为矩阵。我们将数据保存为一个对象(us_quarters)，它是一个简单的数据集，包含一个状态的名称，然后是该状态在两个不同的币种产生的硬币数量。

State    DenverMint PhillyMint
Delaware   401424    373400
one row for each state. 

我试图创建这个数据的并排条形图，首先需要将数据转换成矩阵来使用它。我似乎正在努力解决的问题是，状态本身是一列，所以当我试图转换时，我最终得到的是存储在海量列表中的字符值和整数值的混乱。

x <- matrix(us_quarters,ncol=3, byrow = TRUE)
colnames(x) <- c("State", "DenverMint", "Phillymint")
x

产生如下结果

State        DenverMint Phillymint
[1,] character,50 integer,50 integer,50

我所要做的一切都需要在这个矩阵中格式化数据，以便正确地使用它，我完全不知道如何进行。如有任何意见，不胜感激。

Answer 1

你可以使用pivot_longer来分组丹佛和费城薄荷吗?

df <- tribble(~state, ~den_mint, ~philly_mint, 
'delaware', 401424,373400, 
'newyork', 460858, 494023)
df %>% 
mutate(state = as.factor(state)) %>% 
pivot_longer(cols = c("den_mint", "philly_mint"), names_to = "mint", values_to = "count") %>% 
ggplot(aes(mint, count)) +
geom_col() +
facet_wrap(~state) +
coord_flip()