diff --git a/subtools/bw_to_color.pro b/subtools/bw_to_color.pro index 099f06b7e8a03c468cb2a21166cf6287257fd7de..1cf50756bafd3f60b3d7727d435f67aa6379648a 100644 --- a/subtools/bw_to_color.pro +++ b/subtools/bw_to_color.pro @@ -148,7 +148,7 @@ function bw_to_color, bw, mini = mini, maxi= maxi, col_table = col_table, dont_s tvlct, coltab_r_old, coltab_g_old, coltab_b_old, /get If keyword_set(brewer) then $ - loadct, abs(col_table) - 100, file=!User.idlUsrDir+'/coyote/fsc_brewer.tbl' else $ + loadct, abs(col_table) - 100, file='/Users/awalther/SOFTWARE/ICWG_IDL/tools/subtools/coyote_library_1.0.7/fsc_brewer.tbl' else $ loadct, abs(col_table) - 100, /silent tvlct, dum_r, dum_g, dum_b, /get diff --git a/subtools/log_histogram.pro b/subtools/log_histogram.pro index b67d65c4ff666ed901670b4fa2da001b68e07c37..0db6d7e8a5d25bb810fe8fa444ccc286b4b8a7ec 100644 --- a/subtools/log_histogram.pro +++ b/subtools/log_histogram.pro @@ -9,27 +9,18 @@ function log_histogram, data, binsize=binsize, min=min, max=max, LOCATIONS=locat min_log = alog10(min) max_log = alog10(max) - ;print, 'min(data) ', min(data) - ;print, 'max(data) ', max(data) + data_log = alog10(data) - - ;print, 'binsize' , binsize - ;print, min_log, min - ;print, max_log, max - ;print, 'min(data_log) ', min(data_log, /NaN) - ;print, 'max(data_log) ', max(data_log, /NaN) - + if max(data) lt 3.0 then data_log = data + histo = (histogram(data_log, binsize=binsize, min=min_log, max=max_log, LOCATIONS=locations)) - ;help, histo - ;help, locations - - ;for i=0, n_elements(locations)-1 do begin - ; print, locations[i], 10^(locations[i]), histo[i] - ;endfor + locations=10^locations + + return, histo