testlist <- list(a_size = -784521420L, data = structure(c(0.0010320890294655,  8.16259890048938e-162, 7.45137035702297e-58, 1.87317515645558e+254,  6.33789040109602e+115), .Dim = c(1L, 5L)), n_threshold = -3.33118842012916e-233,      nr_strategy = c(NA, "dtankanncggesicbxzaw", NA, "apxspdmvtxofew",      "ovzqubuxgapbeamnzshf", NA, NA, "faigvuvjpdkzwmasmptz", "nmrzjxvqidywusjjcigk",      "dnhttwelblbmzjasq", "rugyepbibjowzjzvqzem", NA, NA, "erx",      "wkmijqfvdaex", "", NA, NA, NA, "zclbnnbrwvaueebdfxni", NA,      "heqgjaruhrmshyziblne", "ihhzgxj", NA, "cqxlkmxehkfnvizkovpb",      "xsxvobnohmfvgpawnlle", NA, NA, "gamvdisyevthsvdmae", "",      "wgvtlsyjnllerwgmd", NA, NA, "sh", "ecinydhcdhhjeujmkhjw",      "jgwtljorvnojwnmbifuk", NA, NA, "ehjobzpmjker", NA, "vyvoznkpyrcvkqih",      "fdgtaivmzrvvdxsgtjrn", "zosvufjhyotbnxwrawea", "d", "uicslcfvtotbeadu",      "waompza", NA, "apgcrvddgkbyxrtqstzr", NA, "niqiwapuggkkg",      NA, "sajxdbyqldsjgmjr", NA, "nzvduaxoniirevzzdoqv", "rocfwoco",      "xgvl", "miqpbhwfqhpvruygyfly", "hystdcezbxqoxm", "aaayrsmyghpfdvkf",      "ovzvsayczaaldcwxoaal", "zchaw", "fpgafohktxdwudigyl", "jvpys",      "yoyubptzn", "xjauwmzgnctckrgzxdrj", "vqhzypjhfbqfmcljcmc",      "tumfcqhsmale", NA, "btyhzqodbyczgvdjpxtj"), paa_size = 1707050905L,      w_size = -1140334620L)
result <- do.call(jmotif::manyseries_to_wordbag,testlist)
str(result)