import java.awt.*; // ScrollPane, PopupMenu, MenuShortcut, etc. import java.awt.geom.*; import java.awt.image.*; import java.awt.event.*; // import java.util.*; // import java.util.Vector; // import java.lang.*; // import java.io.*; // import javax.swing.*; import javax.swing.event.*; public class PC extends DragBox implements ActionListener { protected int width, height; // The preferred size. protected int oldWidth, oldHeight; // The last size for constructing the polygons. private Image bi, tbi, ttbi; private Graphics2D bg; protected int[] vars; protected int xVar; protected int yVar; protected int k; protected double slotWidth; protected int slotMax = 40; protected int addBorder = 0; private int outside = 5; private int tick = 5; private int roundY; protected int selID = -1; protected int scaleFactor = 3; protected double centerAt = 0; protected dataSet data; protected double[] dMins, dIQRs, dMedians, dMeans, dSDevs, dMaxs; protected double[] Mins, Maxs; protected double[][] dataCopy; protected String[] lNames; protected int[] permA; protected double[] sortA; protected boolean[] selected; protected boolean[] inverted; protected boolean hotSelection = false; protected boolean zoomToSel = false; protected boolean[] onlyHi; Polygon[] poly; String Scale = "Common"; String paintMode = "Box"; String sortMode = "ini"; String alignMode = "center"; float alpha = 1F; int movingID; boolean moving; MyText movingName; private int lastX; Vector names = new Vector(10,10); Vector bPlots = new Vector(10,10); Vector rects = new Vector(30,10); Vector tabs = new Vector(10,10); private DataListener listener; private static EventQueue evtq; public PC(JFrame frame, dataSet data, int[] vars, String mode) { super(frame); Dimension size = frame.getSize(); this.width = size.width; this.height = size.height; oldWidth = size.width; oldHeight = size.height; this.vars = vars; this.data = data; this.k = vars.length; this.paintMode = mode; border = 22; onlyHi = new boolean[data.n]; for( int i=0; i= 0.99 ) alpha1.setState(true); else if( alpha >= 0.49 ) alpha05.setState(true); else if( alpha >= 0.099 ) alpha01.setState(true); else if( alpha >= 0.049 ) alpha005.setState(true); else if( alpha >= 0.0099 ) alpha001.setState(true); else if( alpha >= 0.0049 ) alpha0005.setState(true); alphaM.add(alpha1); alphaM.add(alpha05); alphaM.add(alpha01); alphaM.add(alpha005); alphaM.add(alpha001); alphaM.add(alpha0005); alpha1.setActionCommand("1.0"); alpha05.setActionCommand("0.5"); alpha01.setActionCommand("0.1"); alpha005.setActionCommand("0.05"); alpha001.setActionCommand("0.01"); alpha0005.setActionCommand("0.005"); alpha1.addActionListener(this); alpha05.addActionListener(this); alpha01.addActionListener(this); alpha005.addActionListener(this); alpha001.addActionListener(this); alpha0005.addActionListener(this); scaleType.add(alphaM); JMenu plotM = new JMenu("Type"); JCheckBoxMenuItem polyM = new JCheckBoxMenuItem("Polygons", false); JCheckBoxMenuItem boxM = new JCheckBoxMenuItem("Box Plots", false); JCheckBoxMenuItem bothM = new JCheckBoxMenuItem("Both", false); if( paintMode.equals("Poly") ) polyM.setState(true); else if( paintMode.equals("Box") ) boxM.setState(true); else if( paintMode.equals("Both") ) bothM.setState(true); plotM.add(polyM); plotM.add(boxM); plotM.add(bothM); if( zoomToSel ) { boxM.setEnabled(false); bothM.setEnabled(false); } polyM.setActionCommand("Poly"); boxM.setActionCommand("Box"); bothM.setActionCommand("Both"); polyM.addActionListener(this); boxM.addActionListener(this); bothM.addActionListener(this); scaleType.add(plotM); JCheckBoxMenuItem hotSelM = new JCheckBoxMenuItem("HotSelector", hotSelection); hotSelM.setAccelerator(KeyStroke.getKeyStroke(KeyEvent.VK_H, Event.SHIFT_MASK | Toolkit.getDefaultToolkit().getMenuShortcutKeyMask())); hotSelM.setActionCommand("Hot"); hotSelM.addActionListener(this); scaleType.add(hotSelM); JMenuItem zoomM = new JMenuItem("Crop Selection"); zoomM.setAccelerator(KeyStroke.getKeyStroke(KeyEvent.VK_R, Toolkit.getDefaultToolkit().getMenuShortcutKeyMask())); zoomM.setActionCommand("Zeiser"); zoomM.addActionListener(this); scaleType.add(zoomM); if( !paintMode.equals("Poly") ) { zoomM.setEnabled(false); } JMenuItem homeM = new JMenuItem("Home View"); homeM.setAccelerator(KeyStroke.getKeyStroke(KeyEvent.VK_0, Toolkit.getDefaultToolkit().getMenuShortcutKeyMask())); homeM.setActionCommand("Home"); homeM.addActionListener(this); scaleType.add(homeM); scaleType.add(new JMenuItem("Dismiss")); if( k > 1 ) if( !paintMode.equals("XbyY") ) scaleType.show(e.getComponent(), e.getX(), e.getY()); else { scaleType = new JPopupMenu("Title"); sortM = new JMenu("Sort Axes by"); sortM.add(quarM); sortM.add(medianM); sortM.addSeparator(); sortM.add(iniM); sortM.add(revM); scaleType.add(sortM); scaleType.add(new JMenuItem("Dismiss")); scaleType.show(e.getComponent(), e.getX(), e.getY()); } } } else if( (e.getID() == MouseEvent.MOUSE_PRESSED ) && !paintMode.equals("XbyY") && ((e.getModifiers() == ALT_DOWN+4) && (System.getProperty("os.name").equals("Irix")) || (e.getModifiers() == ALT_DOWN+4) && (System.getProperty("os.name").equals("Linux")) || (e.getModifiers() == ALT_DOWN) && (System.getProperty("os.name").equals("Mac OS")) || (e.getModifiers() == BUTTON1_DOWN + ALT_DOWN)) ) { // // System.out.println("Moving Start"); // moving = true; frame.setCursor(Frame.HAND_CURSOR); int minXDist = 5000; int popXId = 0; Polygon p = poly[0]; for( int j=0; jinsertBefore; j-- ) permA[j] = permA[j-1]; permA[insertBefore] = save; } if( insertBefore < movingID || insertBefore > movingID +1 ) { // Check whether the current order has been changed or not sortMode = "foo"; } create(width, height); update(this.getGraphics()); } // Moving Axis handling end else { // Zooming into individual axes if( ((e.getModifiers() == CTRL_DOWN+16) && (System.getProperty("os.name").equals("Irix"))) || ((e.getModifiers() == CTRL_DOWN+16) && (System.getProperty("os.name").equals("Linux"))) || ((e.getModifiers() == 20) && (System.getProperty("os.name").equals("Mac OS X"))) || (e.getModifiers() == META_DOWN) ) { //System.out.println("Return: "+e.getModifiers()+" Test: "+(BUTTON1_DOWN + CTRL_DOWN)); if (e.getID() == MouseEvent.MOUSE_PRESSED ) { lastX = e.getX(); //System.out.println("lastX: "+lastX); } else { int popXId = 0; Polygon p = poly[0]; if( Math.abs(e.getX() - lastX) > 4 ) { int testX = lastX + (int)(0.5+slotWidth)/2 * ( e.getX() - lastX ) / Math.abs( e.getX() - lastX ); for( int j=0; j testX) && (lastX > p.xpoints[j]) ){ popXId = j; //System.out.println("popXId: "+popXId+" e.getX: "+e.getX()); } } setCoordinates(0, Mins[permA[popXId]], 1, Maxs[permA[popXId]], -1); super.processMouseEvent(e); // This performs the zoom !! Mins[permA[popXId]] = getLly(); Maxs[permA[popXId]] = getUry(); } else { int minXDist = 5000; for( int j=0; j Toolkit.getDefaultToolkit().getScreenSize().width) { frame.setSize((Toolkit.getDefaultToolkit().getScreenSize()).width, frame.getHeight()); this.setSize((Toolkit.getDefaultToolkit().getScreenSize()).width, this.getHeight()); } } if ((e.getID() == KeyEvent.KEY_PRESSED) && (e.getKeyCode() == Event.BACK_SPACE)) { if( k>2 && paintMode.equals("Poly") || k>1 && !paintMode.equals("Poly") ) { for( int j=0; j vars[permA[j]] ) // ((floatRect)S.o).var -= 1; } // for( int i=permA[j]; i permA[j] ) permA[i] -= 1; for( int i=j; i= 2 ) scaleFactor -= 1; this.dataChanged(0); } else if(e.getID() == KeyEvent.KEY_PRESSED && ( e.getKeyCode() == KeyEvent.VK_LEFT || e.getKeyCode() == KeyEvent.VK_RIGHT )) { if( e.getKeyCode() == KeyEvent.VK_RIGHT ) { if( alpha >= 0.99 ) return; else if( alpha >= 0.49 ) alpha = 1.0F; else if( alpha >= 0.099 ) alpha = 0.5F; else if( alpha >= 0.049 ) alpha = 0.1F; else if( alpha >= 0.0099 ) alpha = 0.05F; else if( alpha >= 0.0049 ) alpha = 0.01F; } else { if( alpha >= 0.99 ) alpha = 0.5F; else if( alpha >= 0.49 ) alpha = 0.1F; else if( alpha >= 0.099 ) alpha = 0.05F; else if( alpha >= 0.049 ) alpha = 0.01F; else if( alpha >= 0.0099 ) alpha = 0.005F; else if( alpha >= 0.0049 ) return; } this.dataChanged(0); } else if ( e.getKeyCode() == KeyEvent.VK_PAGE_UP || e.getKeyCode() == KeyEvent.VK_PAGE_DOWN ) { int[] tPerm = new int[k]; if ( e.getKeyCode() == KeyEvent.VK_PAGE_UP ) { tPerm[0] = permA[2]; tPerm[1] = permA[0]; for( int j=2; j 0 ) onlyHi[i] = onlyHi[i] && true; else onlyHi[i] = onlyHi[i] && false; for(int i=0; i 1 ) slotWidth = (width-2.0*border)/(k-1.0); else slotWidth = 100; this.dataChanged(0); } else super.actionPerformed(e); } public void paint(Graphics2D g2d) { Graphics2D g = (Graphics2D)g2d; int pF = 1; double[] selection; Dimension size = this.getSize(); if( printing ) slotMax = 1000000; else slotMax = 40; if( oldWidth != size.width || oldHeight != size.height || hotSelection || frame.getBackground() != MFrame.backgroundColor) { frame.setBackground(MFrame.backgroundColor); this.width = size.width; this.height = size.height; if( hotSelection && !zoomToSel ) getData(); if( zoomToSel && hotSelection ) { hotSelection = false; for(int i=0; i0 ) { selection = data.getSelection(); if( paintMode.equals("Poly") || paintMode.equals("Both")) { if( ((MFrame)frame).getAlphaHi() ) ((Graphics2D)tbg).setComposite(AlphaComposite.getInstance(AlphaComposite.SRC_OVER, (float)alpha)); else ((Graphics2D)tbg).setComposite(AlphaComposite.getInstance(AlphaComposite.SRC_OVER, 1.0F)); for( int i=0; i 0 && onlyHi[i] ) tbg.drawPolyline(poly[i].xpoints, poly[i].ypoints, k); } } if( paintMode.equals("Box") || paintMode.equals("Both") || paintMode.equals("XbyY") ) { for( int i=0; i 0 ) { Table tablep = (Table)(tabs.firstElement()); for( int i = 0;i < rects.size(); i++) { MyRect r = (MyRect)rects.elementAt(i); double sum=0, sumh=0; int id = ((Integer)(r.tileIds.elementAt(0))).intValue(); if( id == 0 && i != 0 ) tablep = (Table)(tabs.elementAt(++tabcount)); sumh = tablep.getSelected(id)*tablep.table[id]; sum = tablep.table[id]; r.setHilite( sumh/sum ); r.draw(tbg); } } } } else if( hotSelection ) { MyText warning = new MyText("No Data Selected!", size.width/2, size.height/2, 2); warning.draw(tbg); } // Plot the labels ... if( !printing ) { ttbi = createImage(size.width, size.height); ttbg = ttbi.getGraphics(); ttbg.drawImage(tbi, 0, 0, Color.black, null); } else ttbg = g; for( int j=0; j sr.x ) checkCol = j+1; } // System.out.println(" **** select col: "+selectCol); int passID = vars[permA[checkCol]]; if( paintMode.equals("XbyY") ) passID = checkCol; selectCol = permA[checkCol]; double denom=0; if( k == 1 ) denom = slotWidth; else denom = p.xpoints[1] - p.xpoints[0]; if( inverted[selectCol] && paintMode.equals("Poly") ) S.o = new floatRect((double)((S.r.x - border - addBorder) % slotWidth)/slotWidth, ((double)(-border+S.r.y+S.r.height))/(height-2*border)*(Maxs[selectCol]-Mins[selectCol])+Mins[selectCol], (double)(S.r.width)/denom, (double)(S.r.height)/(height-2*border)*(Maxs[selectCol]-Mins[selectCol]), passID); else S.o = new floatRect((double)((S.r.x - border - addBorder) % slotWidth)/slotWidth, ((double)(height-border-S.r.y))/(height-2*border)*(Maxs[selectCol]-Mins[selectCol])+Mins[selectCol], (double)(S.r.width)/denom, (double)(S.r.height)/(height-2*border)*(Maxs[selectCol]-Mins[selectCol]), passID); /* else S.o = new floatRect((double)((S.r.x - border) % slotWidth)/slotWidth, ((double)(height-border-S.r.y))/(height-40)*(Maxs[selectCol]-Mins[selectCol])+Mins[selectCol], (double)(S.r.width)/(p.xpoints[1] - p.xpoints[0]), (double)(S.r.height)/(height-2*border)*(Maxs[selectCol]-Mins[selectCol]), passID);*/ if( ((floatRect)S.o).x < 0 ) ((floatRect)S.o).x = 1-Math.abs(((floatRect)S.o).x); int tabcount = 0; int thistable = 0; boolean intersect = false; for( int i = 0;i < rects.size(); i++) { MyRect r = (MyRect)rects.elementAt(i); int id = ((Integer)(r.tileIds.elementAt(0))).intValue(); if( id == 0 && i != 0 ) tabcount++; if ( r.intersects( sr )) { thistable = tabcount; intersect = true; } } if( intersect && !paintMode.equals("Poly") ) { Table tablep=(Table)(tabs.firstElement()); tabcount = 0; for( int i = 0;i < rects.size(); i++) { MyRect r = (MyRect)rects.elementAt(i); double sum=0, sumh=0; int id = ((Integer)(r.tileIds.elementAt(0))).intValue(); if( id == 0 && i != 0 ) tablep = (Table)(tabs.elementAt(++tabcount)); if( tabcount == thistable ) { if ( r.intersects( sr )) tablep.setSelection(id,1,mode); else tablep.setSelection(id,0,mode); sumh = tablep.getSelected(id)*tablep.table[id]; sum = tablep.table[id]; r.setHilite( sumh/sum ); } } } else { if( paintMode.equals("XbyY") ) { for( int i=0; i 0 ) { for( int j=0; j 0 ) selID = i; for( int j=0; j 1 ) if( paintMode.equals("XbyY") || ((paintMode.equals("Box") || paintMode.equals("Both")) && Scale.equals("Individual")) ) if( k==2 ) slotWidth = 70; else slotWidth = (width-2.75*border)/(k-1.0); else slotWidth = (width-2.0*border)/(k-1.0); else slotWidth = 100; // System.out.println("Slot: "+slotWidth+"Slot Max: "+slotMax); names.removeAllElements(); if( paintMode.equals("XbyY") ) { lNames = data.getLevels(yVar); for( int j=0; j= Mins[j] ) totMin = Mins[j]; if( totMax <= Maxs[j] ) totMax = Maxs[j]; } } for( int j=0; j maxRange ) maxRange = range; for( int j=0; j 1); } // dummy for scrolling public void adjustmentValueChanged(AdjustmentEvent e) { } public void scrollTo(int id) { } class floatRect { double x, y, w, h; int var; public floatRect(double x, double y, double w, double h, int var) { this.x = x; this.y = y; this.w = w; this.h = h; this.var = var; } } class boxPlot { double min, lHinge, median, uHinge, max; double sMin, lSHinge, sMedian, uSHinge, sMax; double lWhisker, uWhisker; double lSWhisker, uSWhisker; double[] lOutlier, uOutlier; double[] lsOutlier, usOutlier; int var, id; int mid, width, low, high; public boxPlot( int id, int var, int mid, int width, int low, int high) { this.id = permA[id]; this.var = var; this.mid = mid; this.width = width; this.low = low; this.high = high; init(); } public void init() { min = data.getQuantile(var, 0); lHinge = data.getQuantile(var, 0.25); median = data.getQuantile(var, 0.5); uHinge = data.getQuantile(var, 0.75); max = data.getQuantile(var, 1); lWhisker = data.getFirstGreater(var, lHinge-(uHinge-lHinge)*1.5); uWhisker = data.getFirstSmaller(var, uHinge+(uHinge-lHinge)*1.5); lOutlier = data.getAllSmaller(var, lWhisker); uOutlier = data.getAllGreater(var, uWhisker); } void draw( Graphics g ) { if( (data.filterVar!=-1 && data.filterGrpSize[data.filterGrp] > 3) || (data.filterVar==-1 && data.n > 3) ) { int lWP = low+(int)((Maxs[id]-lWhisker)/(Maxs[id]-Mins[id])*(high-low)); int lHP = low+(int)((Maxs[id]-lHinge)/(Maxs[id]-Mins[id])*(high-low)); int medP = low+(int)((Maxs[id]-median)/(Maxs[id]-Mins[id])*(high-low)); int uHP = low+(int)((Maxs[id]-uHinge)/(Maxs[id]-Mins[id])*(high-low)); int uWP = low+(int)((Maxs[id]-uWhisker)/(Maxs[id]-Mins[id])*(high-low)); /*System.out.println(" Min:"+min); System.out.println("Lower Whisk:"+lWhisker); System.out.println("Lower Hinge:"+lHinge); System.out.println(" Median:"+median); System.out.println("Upper Hinge:"+uHinge); System.out.println("Upper Whisk:"+uWhisker); System.out.println(" Max:"+max); System.out.println(" Number of uppers:"+ uOutlier.length); System.out.println(" Number of lowers:"+ lOutlier.length); System.out.println("============");*/ // Base Boxes g.setColor(Color.lightGray); g.fillRect(mid-width/2, uWP, width, uHP-uWP); g.setColor(Color.black); g.drawRect(mid-width/2, uWP, width, uHP-uWP); g.setColor(Color.gray); g.fillRect(mid-width/2, uHP, width, medP-uHP); g.setColor(Color.black); g.drawRect(mid-width/2, uHP, width, medP-uHP); g.setColor(Color.gray); g.fillRect(mid-width/2, medP, width, lHP-medP); g.setColor(Color.black); g.drawRect(mid-width/2, medP, width, lHP-medP); g.setColor(Color.lightGray); g.fillRect(mid-width/2, lHP, width, lWP-lHP); g.setColor(Color.black); g.drawRect(mid-width/2, lHP, width, lWP-lHP); int dia = 3; if( printing ) dia *= printFactor; for( int i=0; i uHinge+(uHinge-lHinge)*3 ) g.fillOval(mid-dia/2, low+(int)((Maxs[id]-uOutlier[i])/(Maxs[id]-Mins[id])*(high-low))-dia/2, dia, dia); g.drawOval(mid-dia/2, low+(int)((Maxs[id]-uOutlier[i])/(Maxs[id]-Mins[id])*(high-low))-dia/2, dia, dia); } } else { int MinP = low+(int)((Maxs[id]-min)/(Maxs[id]-Mins[id])*(high-low)); int MedP = low+(int)((Maxs[id]-median)/(Maxs[id]-Mins[id])*(high-low)); int MaxP = low+(int)((Maxs[id]-max)/(Maxs[id]-Mins[id])*(high-low)); g.drawRect(mid-width/2+4, MinP, width-8, 1); g.drawRect(mid-width/2+4, MedP, width-8, 1); g.drawRect(mid-width/2+4, MaxP, width-8, 1); } } void drawHighlight( Graphics g ) { if( data.filterVar != -1 ) { // System.out.println("***** Group Size: "+data.filterSelGrpSize[data.filterGrp]); if( data.filterSelGrpSize[data.filterGrp] == 0) { // System.out.println("Skipping: "+data.filterGrp); return; } } int count = data.countSelection(); sMin = data.getSelQuantile(var, 0); lSHinge = data.getSelQuantile(var, 0.25); sMedian = data.getSelQuantile(var, 0.5); uSHinge = data.getSelQuantile(var, 0.75); sMax = data.getSelQuantile(var, 1); if( count > 3 ) { lsOutlier = data.getAllSelSmaller(var, lSHinge-(uSHinge-lSHinge)*1.5); usOutlier = data.getAllSelGreater(var, uSHinge+(uSHinge-lSHinge)*1.5); /* if( lOutlier.length == 0 ) lSWhisker = sMin; else lSWhisker = lOutlier[lOutlier.length-1]; if( uOutlier.length == 0 ) uSWhisker = sMax; else uSWhisker = uOutlier[uOutlier.length-1]; */ lSWhisker = data.getFirstSelGreater(var, lSHinge-(uSHinge-lSHinge)*1.5); uSWhisker = data.getFirstSelSmaller(var, uSHinge+(uSHinge-lSHinge)*1.5); int lSWP = low+(int)((Maxs[id]-lSWhisker)/(Maxs[id]-Mins[id])*(high-low)); int lSHP = low+(int)((Maxs[id]-lSHinge)/(Maxs[id]-Mins[id])*(high-low)); int sMedP = low+(int)((Maxs[id]-sMedian)/(Maxs[id]-Mins[id])*(high-low)); int uSHP = low+(int)((Maxs[id]-uSHinge)/(Maxs[id]-Mins[id])*(high-low)); int uSWP = low+(int)((Maxs[id]-uSWhisker)/(Maxs[id]-Mins[id])*(high-low)); // Highlight Boxes int smaller = width/8; g.setColor(getHiliteColor()); g.drawRect(mid-width/2+smaller, uSWP, width-2*smaller, 1); g.drawLine(mid, uSWP, mid, uSHP); g.fillRect(mid-width/2+smaller, uSHP, width-2*smaller, sMedP-uSHP); g.setColor(Color.black); g.drawRect(mid-width/2+smaller, uSHP, width-2*smaller, sMedP-uSHP); g.setColor(getHiliteColor()); g.fillRect(mid-width/2+smaller, sMedP, width-2*smaller, lSHP-sMedP); g.setColor(Color.black); g.drawRect(mid-width/2+smaller, sMedP, width-2*smaller, lSHP-sMedP); g.setColor(getHiliteColor()); g.drawRect(mid-width/2+smaller, lSWP, width-2*smaller, 1); g.drawLine(mid, lSWP, mid, lSHP); int dia = 3; if( printing ) dia *= printFactor; for( int i=0; i uSHinge+(uSHinge-lSHinge)*3 ) g.fillOval(mid-dia/2, low+(int)((Maxs[id]-usOutlier[i])/(Maxs[id]-Mins[id])*(high-low))-dia/2, dia, dia); g.drawOval(mid-dia/2, low+(int)((Maxs[id]-usOutlier[i])/(Maxs[id]-Mins[id])*(high-low))-dia/2, dia, dia); } } else { sMin = data.getSelQuantile(var, 0); sMedian = data.getSelQuantile(var, 0.5); sMax = data.getSelQuantile(var, 1); int sMinP = low+(int)((Maxs[id]-sMin)/(Maxs[id]-Mins[id])*(high-low)); int sMedP = low+(int)((Maxs[id]-sMedian)/(Maxs[id]-Mins[id])*(high-low)); int sMaxP = low+(int)((Maxs[id]-sMax)/(Maxs[id]-Mins[id])*(high-low)); g.setColor(getHiliteColor()); g.drawRect(mid-width/2+4, sMinP, width-8, 1); g.drawRect(mid-width/2+4, sMedP, width-8, 1); g.drawRect(mid-width/2+4, sMaxP, width-8, 1); } } } }