Error: C stack usage 15923760 is too close to the limit (probably do to noquote)

[AKRosenblad]

Seems to be a problem with noquote:

# [Minimal reproducible example]

library(data.table)
A <- rep("A", 50)
B <- rep("B", 50)
AB <- data.table(A, B)
fun <- function(x) noquote(as.matrix(x))
AB[, lapply(.SD, fun)] # not OK
#Error: C stack usage  15923760 is too close to the limit`

But the following works fine:
lapply(AB[, .SD], fun) # OK

# Output of sessionInfo()
`R version 4.0.0 (2020-04-24)
Platform: x86_64-w64-mingw32/x64 (64-bit)
Running under: Windows 10 x64 (build 17763)

Matrix products: default

locale:
[1] LC_COLLATE=Swedish_Sweden.1252 LC_CTYPE=Swedish_Sweden.1252 LC_MONETARY=Swedish_Sweden.1252
[4] LC_NUMERIC=C LC_TIME=Swedish_Sweden.1252

attached base packages:
[1] stats graphics grDevices utils datasets methods base

other attached packages:
[1] data.table_1.12.8

loaded via a namespace (and not attached):
[1] compiler_4.0.0 tools_4.0.0 `

[jangorecki]

Thank you for reporting. If you want to use matrix inside data.table columns, you need to wrap it into list.

fun <- function(x) list(noquote(as.matrix(x)))