diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2019-07-18 19:02:13 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2019-07-18 19:02:13 (GMT) |
commit | d320f998ea6e707b55fd8099274006f8ba85326f (patch) | |
tree | c0c845edbfd822803efa91ab006a78057994eff0 /ds9/library/markeranalysispanda.tcl | |
parent | 3f30b7538f43f132175929faa9025144c4316312 (diff) | |
download | blt-d320f998ea6e707b55fd8099274006f8ba85326f.zip blt-d320f998ea6e707b55fd8099274006f8ba85326f.tar.gz blt-d320f998ea6e707b55fd8099274006f8ba85326f.tar.bz2 |
fix radial anlayis panda
Diffstat (limited to 'ds9/library/markeranalysispanda.tcl')
-rw-r--r-- | ds9/library/markeranalysispanda.tcl | 17 |
1 files changed, 16 insertions, 1 deletions
diff --git a/ds9/library/markeranalysispanda.tcl b/ds9/library/markeranalysispanda.tcl index ac254d4..282ff90 100644 --- a/ds9/library/markeranalysispanda.tcl +++ b/ds9/library/markeranalysispanda.tcl @@ -104,7 +104,22 @@ proc MarkerAnalysisPandaCB {frame id} { } PlotDeleteDataSetAll $vvarname - PlotAddDataSet $vvarname 3 [$frame get marker $id analysis panda $sys] + + set data [$frame get marker $id analysis panda $sys] + set id 0 + for {set jj 0} {$jj<$var(angnum)} {incr jj} { + set dd {} + for {set ii 0} {$ii<$var(annuli)} {incr ii} { + lappend dd [lindex $data $id] + incr id + lappend dd [lindex $data $id] + incr id + lappend dd [lindex $data $id] + incr id + } + PlotAddDataSet $vvarname 3 $dd + } + PlotStats $vvarname PlotList $vvarname } |