anchor.diff:      Data = frame_data(Data0, Sort, fun(T) -> T end),
   
       {width, Width} = config_lookup(report, width, ReportCfg),
  -    PngFile = ds_graphics:timestamp_range_graph([{xsize, Width-36}], %% FIXME
  +    PngFile = ds_graphics:timestamp_range_graph([{xsize, Width-40}], %% FIXME
                                                   lists:reverse(Data)),
       ds_graphics:gc_image_file(PngFile, ?IMAGE_GC_TIMEOUT),
       [{tr, [], [{td, [], [br]}]}, % vskip
        {tr, [],
  -      [{th, [{align, left}, {colspan, Cols}],
  +      [{th, [{align, left}],
           [{font, [{size, "+1"}], [{str, "Timeline of sampled values"}]}]}]},
        {tr, [],
  -      [{td, [{align, left}, {colspan, Cols}],
  +      [{td, [{align, left}],
           [{img, [{src, PngFile}], []}]}]}].
   
   value_row({Value, PVAttrs}, false) ->
  
positive.code:     Data = [value_row(V, AttrCols) || V <- Values],
      frame(samples, stats_headers(AttrCols), Data, fun stats_display_f/1, ReportCfg).
  
  range_graph(false,_Cols,_Pts,_Samples,_ReportCfg) -> [];
  range_graph(true, Cols, Pts, Samples, ReportCfg) ->
      AllSamples0 = Samples ++ [{Value, PVAttrs} || {_Pt, Value, PVAttrs} <- Pts],
      AllSamples1 = [value_row(V, true) || V <- AllSamples0],
      AllSamples = [Row || {_V,_C, MinTS,_MinK, MaxTS,_MaxK} = Row <- AllSamples1,
  
negative.code:       {tr, [],
         [{td, [],
           [{table, [{cellspacing, 0}],
             histogram_data_table(ShowTable, Id, Data, ReportCfg)}]}]}]}].
  
  histogram_data_table(false,_Id,_Data,_ReportCfg) -> [];
  histogram_data_table(true, Id, Data, ReportCfg) ->
  