Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Xprod
xprod <- function(x,y) { m <- rbind (rep (NA, 3),x,y) xp <- vector(length=3) for (i in 1:3) xp[i] <- -(-1)^i * det (m[2:3,-i]) return (xp) } x=c(1,2,-1) y=c(0,-1,1) v=xprod(x,y) print(v)
run
|
edit
|
history
|
help
0
Tablet-Sprite-image-Interval
Paired t-test [Shear Strength of Girder]
CDF- Gaussian (trapezoids method)
asdf
gamma_01
Erro padrão
Chi Square Tests [Is the die fair?]
EXP1STATS
Example R Code
Sampling Distribution for the Wald-Wolfowitz 2-Sample Runs Test