<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />Hola a todos,
¿Me estoy perdiendo de algo? Como se describe a continuación, el resultado que obtengo difiere de lo que se muestra en el Guia de Scripting. (Soy nuevo en JMP, pero ya le pregunté a un usuario experimentado y él también estaba perplejo).
Copié y pegué el siguiente código de las Matrices Asociativas en el ejemplo de Teoría de Gráficos (páginas 215 y 216 del Guia de Scripting para 12.1).
g = matriz asociativa ();
g [1] = Matriz asociativa ({1, 2, 4});
g [2] = Matriz asociativa ({1, 3});
g [3] = Matriz asociativa ({4, 5});
g [4] = Matriz asociativa ({4, 5});
g [5] = Matriz asociativa ({1, 2});
dfs = Función ({ref, nodo, visitado}, Local ({chnode, tmp},
Escribir ("Nodo:" || Char (nodo) || "," || Char (ref [nodo] << obtener contenido) || "\! N");
visitado [nodo] = 1;
tmp = ref [nodo];
chnode = tmp << primero; Mientras (falta) (chnode),
Si (! Visitó [chnode],
visitada = Recurse (ref, chnode, visitada)
);
chnode = tmp << siguiente (chnode); );
visitó; )
);
dfs (g, 2, J (N elementos (g << obtener teclas), 1, 0));
El libro muestra el siguiente resultado:
Nodo 2: {1, 3}
Nodo 1: {1, 2, 4}
Nodo 4: {4, 5}
Nodo 5: {1, 2}
Nodo 3: {4, 5}
[1, 1, 1, 1, 1]
Obtengo este resultado:
Nodo: 2, {{1, 1}, {3, 1}}
Nodo: 1, {{1, 1}, {2, 1}, {4, 1}}
Nodo: 4, {{4, 1}, {5, 1}}
Nodo: 5, {{1, 1}, {2, 1}}
Nodo: 3, {{4, 1}, {5, 1}}
[1, 1, 1, 1, 1]
¿Alguna sugerencia?
¡Gracias!
El doc esta equivocado Gracias por informarlo. Reemplazar "obtener contenido" con "obtener claves" producirá la salida provista.