/entrega3/main.m

http://github.com/melisabok/RedesNeuronales · Objective C · 39 lines · 35 code · 4 blank · 0 comment · 1 complexity · 4b1aa27b6cae710a458544a68dccf142 MD5 · raw file 

    

  1. clear all;
    2. 

  2. clc;
    3. 

  3. 

  4. delete('salida.csv');
    5. 

  5. delete('mapa.csv');
    6. 

  6. Train = csvread('Segment_Train.csv');
    7. 

  7. Test = csvread('Segment_Test.csv');
    8. 

  8. 

  9. % %%Parametros
    10. 

  10. fil_ocultas = 9;
    11. 

  11. col_ocultas = 9;
    12. 

  12. vecinas = 4;
    13. 

  13. ITE_MAX = 1000;
    14. 

  14. alfa = 0.05;
    15. 

  15. beta = 0.1;
    16. 

  16. % %%
    17. 

  17. 

  18. for i = 1:10
    19. 

  19.     [RTrain RTest] = realizar_corrida(Train, Test, fil_ocultas, col_ocultas, vecinas, ITE_MAX, alfa, beta);
    20. 

  20.     dlmwrite('salida.csv',[RTrain RTest],'delimiter','\t','-append');
    21. 

  21. end
    22. 

  22. 

  23. %No son linealmente separables%
    24. 

  24. % R = verificar_linealmente_separable(Train, 3);
    25. 

  25. % R
    26. 

  26. % R = verificar_linealmente_separable(Train, 4);
    27. 

  27. % R
    28. 

  28. % R = verificar_linealmente_separable(Train, 5);
    29. 

  29. % R
    30. 

  30. % 
    31. 

  31. % %Son linealmente sep%
    32. 

  32. % R = verificar_linealmente_separable(Train, 1);
    33. 

  33. % R
    34. 

  34. % R = verificar_linealmente_separable(Train, 2);
    35. 

  35. % R
    36. 

  36. % R = verificar_linealmente_separable(Train, 6);
    37. 

  37. % R
    38. 

  38. % R = verificar_linealmente_separable(Train, 7);
    39. 

  39. % R
    40.