function [d,a] =  generate(a)

if a.seed>0 rand('seed',a.seed);   end;
x=(rand(a.l,a.n)-0.5)*2;

y=sign(x*a.coef);




d=data([get_name(a) ' '] ,x,y);