/*************************************************************************************
Janne Koljonen
Vaasan yliopisto
13.5.2008

Soft Computing
Ennustetaan Vaconin seuraavaa päätöskurssia 
Vaconin kymmenen edellisen päivän päätöskursseilla.

**************************************************************************************/

import java.io.*;

public class VaconMLP
{

	public static void main(String[] args) throws IOException
	{
		double[] prices={28.6,28.5,27.81,28.69,29.76,28.74,29.33,29.11,29.10,28.29,28.25,27.60,27.80,27.52,27.30,27.10,28.00,28.00,28.26};
		// Opetusvektorit
		double[][] x=new double[prices.length-11][10];
		double[][] y=new double[prices.length-11][1];

		// i = ennustettava päivä
		for(int i=10; i<prices.length-1; i++)
		{
			for(int d=0;d<x[0].length;d++)
			{
				x[i-x[0].length][d]=prices[i-(d+1)]/100; // 10 edellisen päivän päätöskurssit
			}
			y[i-10][0]=prices[i]/100; // Tämän päivän päätöskurssi on haluttu vaste
		}

		double[] prices2={28.29,28.25,27.60,27.80,27.52,27.30,27.10,28.00,28.00,28.26,28.90,29.26,29.50,29.99,29.35};
		// Testivektorit
		double[][] x2=new double[prices2.length-11][10];
		double[][] y2=new double[prices2.length-11][1];

		// i = ennustettava päivä
		for(int i=10; i<prices2.length-1; i++)
		{
			for(int d=0;d<x2[0].length;d++)
			{
				x2[i-x2[0].length][d]=prices2[i-(d+1)]/100; // 10 edellisen päivän päätöskurssit
			}
			y2[i-10][0]=prices2[i]/100; // Tämän päivän päätöskurssi on haluttu vaste
		}


		// Kaksikerroksinen hermoverkko
		int[] inputs={10,10};
		int[] outputs={10,1};
		MLP mlp=new MLP(inputs,outputs,0.1);

		System.out.println("Testijoukon keskivirhe="+mlp.error(x2,y2));
		BufferedReader r=new BufferedReader(new InputStreamReader(System.in));
		String s;
		do
		{
			System.out.println("Mitä tehdään? (train,quit)");
			s=r.readLine();
			if(s.equals("train"))
			{
				System.out.print("Iteraatioden määrä:");
				int kpl=1000;
				try
				{
					kpl=Integer.parseInt(r.readLine());
				}
				catch(NumberFormatException ex){}
				System.out.print("Minimivirhe (0-1):");
				double min=0.1;
				try
				{
					min=Double.parseDouble(r.readLine());
				}
				catch(NumberFormatException ex){}
				mlp.opeta(x,y,kpl,min);
				System.out.println("Testijoukon keskivirhe="+mlp.error(x2,y2));
			}
			else
			{
			}

		}
		while(!s.equals("quit"));
		System.out.println("Testijoukon keskivirhe="+mlp.error(x2,y2));
		double[] kurssi=mlp.o(x2[x2.length-1]);
		System.out.println("Vacon tänään = "+100*kurssi[0]+" euroa. (Oikeasti tosin "+100*y2[y2.length-1][0]+" euroa)");
	}
}