Displaying 1 result from an estimated 1 matches for "problaem".
2008 Jun 29
3
Interactive plot
Hi all,
I have created following codes :
mat = cbind(c(0.000059710430,0.000023057380), c(0.000023057380, 0.00005971089))
set.seed = 1000
vary = runif(dim(mat)[1], 2000, 3000)
calc = function(mat, vary)
{
result = vector(length = (length(vary)+1))
result[1] = sqrt(t(vary) %*% vary)
for (i in 1 : length(vary))
{
result[(i+1)] = sum(vary)*sum(vary*mat[,i])