       origin: origin
 
   inspectRawArray_ = (name, origin, description, array) -> ->
-    createDataframe name, [createList name, parseNulls array], (sequence array.length), null,
+    createDataframe name, [createList name, parseAndFormat array], (sequence array.length), null,
       description: description
       origin: origin
 
   inspectRawObject_ = (name, origin, description, obj) -> ->
     vectors = for k, v of obj
-      createList k, [ if v is null then undefined else v ]
+      createList k, [ if v is null then undefined else if isNumber v then format4fi v else v ]
 
     createDataframe name, vectors, (sequence 1), null,
       description: description

  target = new Array source.length
  for element, i in source
    target[i] = if element? then element else undefined
  target

repeatValues = (count, value) ->

  else
    number

format4fi = (number) ->
  if number
    number.toFixed(4).replace(/\.0+$/, '')
  else
    number

combineTables = (tables) ->
  leader = head tables

