Method: Statsample::Regression::Multiple::BaseEngine#report_building

Defined in:
lib/statsample/regression/multiple/baseengine.rb

#report_building(b) ⇒ Object



185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
# File 'lib/statsample/regression/multiple/baseengine.rb', line 185

def report_building(b)
  di="%0.#{digits}f"
  b.section(:name=>@name) do |g|
    c=coeffs
    g.text _("Engine: %s") % self.class
    g.text(_("Cases(listwise)=%d(%d)") % [@total_cases, @valid_cases])
    g.text _("R=")+(di % r)
    g.text _("R^2=")+(di % r2)
    g.text _("R^2 Adj=")+(di % r2_adjusted)
    g.text _("Std.Error R=")+ (di % se_estimate)
    
    g.text(_("Equation")+"="+ sprintf(di,constant) +" + "+ @fields.collect {|k| sprintf("#{di}%s",c[k],k)}.join(' + ') )
    
    g.parse_element(anova)
    sc=standarized_coeffs
    
    cse=coeffs_se
    g.table(:name=>_("Beta coefficients"), :header=>%w{coeff b beta se t}.collect{|field| _(field)} ) do |t|
				t.row([_("Constant"), sprintf(di, constant), "-", constant_se.nil? ? "": sprintf(di, constant_se), constant_t.nil? ? "" : sprintf(di, constant_t)])
      @fields.each do |f|
        t.row([f, sprintf(di, c[f]), sprintf(di, sc[f]), sprintf(di, cse[f]), sprintf(di, c[f].quo(cse[f]))])
      end  
    end
  end
end