function Analizar($tabla_aguja,$pajar,$num_agujas,$categoria) { for($i=0;$i<$num_agujas;$i++) { $desplaz=0; if(!isset($resultado[$tabla_aguja[$i][0]])) $resultado[$tabla_aguja[$i][0]]=0; do { $pos=strpos($pajar,$tabla_aguja[$i][1],$desplaz); if($pos!=false) { $resultado[$tabla_aguja[$i][0]]++; $desplaz=$pos+1; } }while($pos!=false); if($resultado[$tabla_aguja[$i][0]]==0) unset($resultado[$tabla_aguja[$i][0]]); } echo "
".$categoria.""; if(sizeof($resultado)!=0) { arsort($resultado); echo " | |
Verbo"; echo " | Apariciones"; for(reset($resultado);$clave=key($resultado);next($resultado)) { echo " |
".$clave; echo " | ".$resultado[$clave]; } } else echo " |
No se ha encontrado ningún verbo"; echo " |