Nothing
##
## c r o s s n . R tests
##
crossn <- pracma::crossn
x <- c(1.0, 0.0, 0.0)
y <- c(1.0, 0.5, 0.0)
z <- c(0.0, 0.0, 1.0)
identical(pracma::dot(x, crossn(rbind(y, z))),
det(rbind(x, y, z)))
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.