% usefile C:\monographregression\computercode\prg\bayesx\rent_additive.txt

% Create a dataset object and read the data
dataset d
d.infile, maxobs=5000 using C:\monographregression\computercode\data\bayesx\rent99.raw

% Set a new delimiter
delimiter = ;

% Generate dummy variables
d.generate glocation = 1*(location=2);
d.generate tlocation = 1*(location=3);

% Open a log file
logopen , replace using C:\monographregression\computercode\results\bayesx\reml_additive.log;

% Create a regression object
remlreg r;

% Define the path where to save the results
r.outfile = C:\monographregression\computercode\results\bayesx\rent;

% Estimation of the additive model
r.regress rentsqm =  area(psplinerw2) + yearc(psplinerw2) + glocation + tlocation, 
family=gaussian using d;

% Close the log file
logclose;