Anonymous user
Abbreviations, easy: Difference between revisions
m
→{{header|R}}
imported>RegalCode (Added implementation for R) |
imported>RegalCode m (→{{header|R}}) |
||
Line 3,130:
# Results
results <- sapply(intstr_list,\(y) {
matc <-
ifelse(length(matc) != 0,toupper(matc[1]),"*error*")
})
|