Rstudio：二进制列表 - 检查先前值更改（或保持不变）的概率

Question

我是 R 新手。 我正在分析的向量是一个项目列表（a，a，b，a，b，b，b，a 等）。 我需要计算a（前一个元素）变成b（下一个元素）、a 变成a、b 变成a 和b 变成b 的概率。 4个结果需要创建一个矩阵。 你能告诉我该怎么做吗？ 我读到了有关 str_detect 函数、duplicate_count、str_count 函数的内容，但我不知道如何将其应用于我的任务。

提前感谢您的帮助和回复！

Answer 1

(seed <- sample(.Machine$integer.max, 1))
#> [1] 2041751758
set.seed(seed) # for reproducibility

(x <- sample(c("a", "b"), 10, TRUE))
#>  [1] "b" "b" "a" "a" "a" "b" "b" "b" "a" "a"
matrix(tabulate((x[-length(x)] == "b") + 2L*(x[-1] == "b") + 1L, 4L),
       2, 2, 0, list(c("a->", "b->"), c("->a", "->b")))
#>     ->a ->b
#> a->   3   1
#> b->   2   3