Приложение в. Исходный код представления с таблицей результатов

<% title 'Выборка' %>

<p><%= link_to "Сохранённые выборки", samples_path %> | <%= link_to "Новая выборка", new_sample_path %></p>

<%= semantic_form_for @sample do |f| %>

  <%= render 'form', :f => f %>

<% end %>

<% if @data %>

  <table class="table">

    <tr>

      <% @data.header.each do |cell| %>

        <th><%= cell.value %></th>

      <% end %>

    </tr>

    <% @data.rows.each do |row| %>

      <tr>

        <% row.each do |cell| %>

          <td><%=h cell.value %></td>

        <%end%>

      </tr>

    <%end%>

  </table>

  <p>Вероятность ошибочного отказа от приёмки пригодной партии продукции:<%=format_decimal(@sample.false_rejection,3)%></p>

  <p>Вероятность ошибочной приёмки непригодной партии продукции:<%=format_decimal(@sample.false_acceptance,3)%></p>

<%end%>

Приложение г. Исходный код классов, отвечающих за построение объектаData::Table

class Data::Table

  include SamplesHelper

  def initialize(sample)

    @sample = sample

  end

  attr_reader :sample

  def header

    unless @header

      @header = Data::Header.new

      @header << Data::Cell.new('p')

      @header << Data::Cell.new('q')

      (sample.c + 1).times do |a|

        @header << Data::Cell.new("P(r=#{a})")

      end

      @header << Data::Cell.new("P(r≤1)")

    end

    @header

  end

  def rows

    unless @rows

      @rows = []

      (sample.p1..sample.p2).step(sample.step) do |p|

        row = Data::Row.new

        row << Data::Cell.new(p)

        row << Data::Cell.new(1 - p)

        p_priemki_partii = 0

        (sample.c + 1).times do |r|

          value = sample.probability(r, p)

          row << Data::Cell.new(format_decimal(value))

          p_priemki_partii += value

        end

        row << Data::Cell.new(format_decimal(p_priemki_partii))

        @rows << row

      end

    end

    @rows

  end

end

class Data::Header

  def initialize

    @cells = []

  end

  def each

    @cells.each do |cell|

      yield cell

    end

  end

  def <<(cell)

    @cells << cell

  end

end

class Data::Cell

  def initialize(value)

    @value = value

  end

  attr_reader :value

end

class Data::Row

  def initialize

    @cells = []

  end

  def each

    @cells.each do |cell|

      yield cell

    end

  end

  def <<(cell)

    @cells << cell

  end

end

24