6 lines
190 B
R
6 lines
190 B
R
s <- "Hello World!"
|
|
system("R CMD SHLIB rtask.c")
|
|
dyn.load("rtask.dll")
|
|
#Output from .C() is always a list, so take only the first element from it
|
|
result <- .C("test", s)[[1]]
|
|
print(result)
|