Displaying 2 results from an estimated 2 matches for "fun_x".
Did you mean:
fun_s
2011 Feb 16
1
speed up the code
...hanks a lot
fun_activation = function(s_k, s_hat, x_k, s_hat_len)
{
common = intersect(s_k, s_hat);
if(length(common) != 0)
{
index = match(common, s_k);
round(sum(x_k[index]) * length(common) / (s_hat_len * length(s_k)), 3);
}
else
{
0;
}
}
fun_x = function(a)
{
round(runif(length(a), 0, 1), 2);
}
symbol_len = 50;
PHI_set = 1:symbol_len;
S = matrix(replicate(M * M, sort(sample(PHI_set, sample(symbol_len, 1)))), M, M);
X = matrix(mapply(fun_x, S), M, M);
S_hat = c(28, 34, 35)
S_hat_len = length(S_hat);
S_hat_matrix = matrix(list(S_...
2011 Jan 07
6
Evaluar función?
Hola a todos!
Soy un novato con R y, como suele pasar, tengo algunas dudas que me gustaría
compartir con vosotros. Antes de nada decir que llevo muchas horas buscando
información y peleándome con los manuales, tanto en inglés como en español,
pero no sé como resolver mi problema que es el siguiente:
¿Cómo puedo hacer para crear un programa con el que, al darle una función y
un punto, me diga que