Prácticas de Estadística en R - Departamento de Estadística e ...
Prácticas de Estadística en R - Departamento de Estadística e ...
Prácticas de Estadística en R - Departamento de Estadística e ...
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
20 3. Un ejemplo para apr<strong>en</strong><strong>de</strong>r R. El Hitori<br />
cat("No se pue<strong>de</strong> tachar la casilla seleccionada\n")<br />
}<br />
else{<br />
tachada[pos[1],pos[2]]=1<br />
}<br />
}<br />
}<br />
# SI QUEREMOS RECUPERAR CASILLA<br />
else if (jugamos==2){<br />
if (tachada[pos[1],pos[2]]==0){<br />
cat("La posición elegida no estaba tachada\n")<br />
}<br />
else {<br />
tachada[pos[1],pos[2]]=0<br />
}<br />
}<br />
dibujatablero(hitori,tachada)<br />
# SE ACABO EL JUEGO?<br />
fila1)<br />
}<br />
if (sum(fila,col)>0){<br />
cat("Se repit<strong>en</strong> numeros\n")<br />
}<br />
else{<br />
cat("ENHORABUENA!!!\n")<br />
juega=F<br />
}<br />
}<br />
}<br />
}