h
Size: a a a
h
AS
h
AS
AS
AS
IS
library(dplyr)
library(data.table)
dt <- data.table(value = 1:3)
dt[, c("csum", "fctrl") :=
{
csum <- cumsum(value);
fctrl <- factorial(csum);
list(csum, fctrl)
}]
dt %>%
mutate(csum = cumsum(value),
fctrl = factorial(csum))
YS
AS
Ю
IS
DK
Ю
AS
Ю
EP
BA
NK
EP