АК
Size: a a a
АК
AS
AM
TRUE
и FALSE
, как посчитать длины цепочек последовательностей?x <- c(T, T, F, F, F, T, F)
это должно быть 2, 3, 1, 1.R
R
R
[1] 2 3 1 1
MS
TRUE
и FALSE
, как посчитать длины цепочек последовательностей?x <- c(T, T, F, F, F, T, F)
это должно быть 2, 3, 1, 1. <- 1
last <- a[1]
new_vec <- c()
for (i in 2:length(a))
{if (a[i] == last)
{len <- len + 1}
else
{
new_vec <- c(new_vec, len)
len <- 1
last <- a[i]}}
new_vec <- c(new_vec, len)
new_vec
АК
TRUE
и FALSE
, как посчитать длины цепочек последовательностей?x <- c(T, T, F, F, F, T, F)
это должно быть 2, 3, 1, 1.AM
PU
TRUE
и FALSE
, как посчитать длины цепочек последовательностей?x <- c(T, T, F, F, F, T, F)
это должно быть 2, 3, 1, 1.АК
Ю
S
Ю
АК
АК