Inserting a table

[Christopher Dimech <dimech@gmx.com>]

Have been trying to insert a table but am finding quite difficult 
following the source code.

(defun make-table ()
  (interactive)
  (table-insert 4 5)
  (table-forward-cell)
  (table-insert-sequence "column " 1 1 1 'center)
  (table-forward-cell 4)
  (table-insert-sequence "column 2" 1 1 1 'center)
  (table-release)
  )