# drop the first row and first column because of divergence on Laplace Transform
# do kimesurface transform on sine function
x = seq(0, 2, length.out=50)[2:50]; y = seq(0, 2, length.out=50)[2:50];
# \donttest{
kimesurface_transform(FUNCT = function(t) {sin(t)}, real_x = x, img_y = y);
# }
Run the code above in your browser using DataLab