/*
* Apache License
* Version 2.0, January 2004
* http://www.apache.org/licenses/
*
* Copyright 2013 Aurelian Tutuianu
* Copyright 2014 Aurelian Tutuianu
* Copyright 2015 Aurelian Tutuianu
* Copyright 2016 Aurelian Tutuianu
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*
*/
package rapaio.graphics.plot;
import rapaio.core.distributions.Distribution;
import rapaio.data.Numeric;
import rapaio.data.Var;
import rapaio.data.filter.var.VFSort;
import rapaio.graphics.opt.GOpt;
import rapaio.graphics.plot.plotcomp.Points;
/**
* @author <a href="mailto:padreati@yahoo.com">Aurelian Tutuianu</a>
*/
public class QQPlot extends Plot {
private static final long serialVersionUID = -3244871850592508515L;
public QQPlot(Var points, Distribution distribution, GOpt... opts) {
this.options.apply(opts);
Var x = new VFSort().fitApply(points);
Var y = Numeric.empty(x.rowCount());
for (int i = 0; i < y.rowCount(); i++) {
double p = (i + 1) / (y.rowCount() + 1.);
y.setValue(i, distribution.quantile(p));
}
add(new Points(y, x));
yLab("Sampling Quantiles");
xLab("Theoretical Quantiles");
title("QQPlot - sample vs. " + distribution.name());
}
}