GPOR

 

[tengzhenzhen15@lu01 gpor]$ for ((i=0; i<=19; i++)) do ./gpor -S 0.4 X4058_300_gpor/mytask_train.$((i)); done

　　

 

[yuanhao15@lu01 gpor]$ ./svorex -P 1 -F 1 -Z 0 -Co 10 ../svorim/X4058_300_im/mytask_train.0

[tengzhenzhen15@lu01 gpor]$ ./gpor -S 0.4 X4058_300_gpor/mytask_train.0

　　

% load pyrim
% NumTrain = 50;


% load machine
%NumTrain = 150;

% load housing
% NumTrain = 300;

% load abalone
% NumTrain = 1000;

% load bank32nh
% NumTrain = 3000;

% load cpuact
% NumTrain = 4000;

%  load calhousing
% NumTrain = 5000;

%  load census
% NumTrain = 6000;

load X4058
NumTrainforScaling =  [300,400] ;
% name='X4058_300_im'
name='X4058_300_gpor'

i=1;

% path= 'C:\Users\hd\Desktop\'
path= 'G:\';


NumTrain = NumTrainforScaling(i);
% X0=[X,y];
% n0 = size(X0,2);
% X0 = sortrows(X0,n0);
% X = X0(:,1:end-1);
% y = X0(:,end);


for k = 1:20
n = size(X,1);
NumTest = n - NumTrain;
id = id0(k,:);

traindata = X(id(1:NumTrain),:);
targets = y(id(1:NumTrain));
TestData = X(id(NumTrain+1:n),:);
TestTargets = y(id(NumTrain+1:n));

X1=[traindata,targets];
n0 = size(X1,2);
X1 = sortrows(X1,n0);


fname1 = strcat(path,name,'\mytask_train.',num2str(k-1));
fname2 = strcat(path,name,'\mytask_test.',num2str(k-1));
fname3 = strcat(path,name,'\mytask_targets.',num2str(k-1));
 
% libsvmwrite(fname1, targets, sparse(traindata));
% libsvmwrite(fname2, TestTargets, sparse(TestData));
fname4 = strcat('E:\MATLAB\R2015a\bin\ADMM\CalOutData\mytask_targets.',num2str(k-1));

save(fname1,'X1','-ascii')
save(fname2,'TestData','-ascii')
save(fname3,'TestTargets','-ascii')
save(fname4,'TestTargets','-ascii')
end


%   load calhousing
%   NumTrainforScaling =  [300,400] ;
%  
%   i=1;
% NumTrain = NumTrainforScaling(i);
% for k=1:20
% k=i;
% % for k = 1:10
% n = size(X,1);
%  NumTest = n - NumTrain;
% % id = randperm(n);
% id = id0(k,:);
% traindata = X(id(1:NumTrain),:);
% targets = y(id(1:NumTrain));
% TestData = X(id(NumTrain+1:n),:);
% TestTargets = y(id(NumTrain+1:n));
% 
% % X1=[traindata,targets];
% 
% % fname1 = strcat('C:\Users\hd\Desktop\machine\mytask_train.',num2str(k-1));
% % fname2 = strcat('C:\Users\hd\Desktop\machine\mytask_test.',num2str(k-1));
% 
% % fname1 = strcat('C:\Users\hd\Desktop\housing\mytask_train.',num2str(k-1));
% % fname2 = strcat('C:\Users\hd\Desktop\housing\mytask_test.',num2str(k-1));
% 
% % fname1 = strcat('C:\Users\hd\Desktop\abalone\mytask_train.',num2str(k-1));
% % fname2 = strcat('C:\Users\hd\Desktop\abalone\mytask_test.',num2str(k-1));
% 
% % fname1 = strcat('C:\Users\hd\Desktop\bank32nh\mytask_train.',num2str(k-1));
% % fname2 = strcat('C:\Users\hd\Desktop\bank32nh\mytask_test.',num2str(k-1));
% 
% % fname1 = strcat('C:\Users\hd\Desktop\cpuact\mytask_train.',num2str(k-1));
% % fname2 = strcat('C:\Users\hd\Desktop\cpuact\mytask_test.',num2str(k-1));
% 
% %  fname1 = strcat('C:\Users\hd\Desktop\calhousing\mytask_train.',num2str(k-1));
% %  fname2 = strcat('C:\Users\hd\Desktop\calhousing\mytask_test.',num2str(k-1));
%  
% %  fname1 = strcat('C:\Users\hd\Desktop\census\mytask_train.',num2str(k-1));
% %  fname2 = strcat('C:\Users\hd\Desktop\census\mytask_test.',num2str(k-1));
% 
% fname1 = strcat('C:\Users\hd\Desktop\',name,'\mytask_train.',num2str(k-1));
% fname2 = strcat('C:\Users\hd\Desktop\',name,'\mytask_test.',num2str(k-1));
% libsvmwrite(fname1, targets, sparse(traindata));
% libsvmwrite(fname2, TestTargets, sparse(TestData));
% 
% 
% % save(fname1,'X1','-ascii')
% % save(fname2,'TestData','-ascii')
% % save(fname3,'TestTargets','-ascii')
% 
% % libsvmwrite(fname1, targets, sparse(traindata));
% % libsvmwrite(fname2, TestTargets, sparse(TestData));

　　

 

clear
Acc=[]; AbsAcc=[];
for k =1:20
    fname1 = strcat('E:\MATLAB\R2015a\bin\ADMM\CalOutData\mytask_targets.',num2str(k-1));
%     fname2 = strcat('E:\MATLAB\R2015a\bin\ADMM\CalOutData\output_file.',num2str(k-1)); 
    fname2 = strcat('E:\MATLAB\R2015a\bin\ADMM\CalOutData\mytask_cguess.',num2str(k-1)); 
    PredYi=textread(fname1);
    Yi=textread(fname2);
    D=PredYi-Yi;
    TrueD = D;
    TrueD(abs(TrueD)>0,1)=1;
    Error(k) = mean(TrueD);
    AbsErr(k) = mean(abs(D));
end

　　

[tengzhenzhen15@lu01 gpor]$ for ((i=0; i<=19; i++)) do ./gpor -S 0.4 pyrim/mytask_train.$((i)); done

[tengzhenzhen15@lu01 gpor]$ for ((i=0; i<=19; i++)) do ./gpor machine/mytask_train.$((i)); done

[tengzhenzhen15@lu01 gpor]$ for ((i=0; i<=19; i++)) do ./gpor housing/mytask_train.$((i)); done