/*
	刻度計算算法，基于魔術數(shù)組 [10, 15, 20, 25, 30, 40, 50, 60, 70, 80, 90, 100];
	解釋：魔數(shù)數(shù)組是理想間隔數(shù)組，即我們希望每個刻度的間隔都是魔數(shù)數(shù)組中某個數(shù)的整數(shù)倍。（準確的來說是整10倍）
*/
//新增，解決js的浮點數(shù)存在精度問題，在計算出最后結果時可以四舍五入一次，因為刻度太小也沒有意義，所以這里忽略設置精度為8位
function fixedNum(num){
	if((""+num).indexOf('.')>=0) num = parseFloat(num.toFixed(8));
	return num;
}
//1.初始化
var symmetrical = false;//是否要求正負刻度對稱。默認為false，需要時請設置為true
var deviation = false;//是否允許誤差，即實際分出的段數(shù)不等于splitNumber
var magic = [10, 15, 20, 25, 30, 40, 50, 60, 70, 80, 90, 100];//魔數(shù)數(shù)組經過擴充，放寬魔數(shù)限制避免出現(xiàn)取不到魔數(shù)的情況。
var arr = [1230, 320, 20, 304, 102, 234];//測試數(shù)據(jù)
var max,min,splitNumber;
splitNumber = 4;//理想的刻度間隔段數(shù)，即希望刻度區(qū)間有多少段
max = Math.max.apply(null,arr);//調用js已有函數(shù)計算出最大值
min = Math.min.apply(null,arr);//計算出最小值
//2.計算出初始間隔tempGap和縮放比例multiple
var tempGap = (max - min) / splitNumber;//初始刻度間隔的大小。
//設tempGap除以multiple后剛剛處于魔數(shù)區(qū)間內，先求multiple的冪10指數(shù)，例如當tempGap為120，想要把tempGap映射到魔數(shù)數(shù)組（即處理為10到100之間的數(shù)），則倍數(shù)為10，即10的1次方。
var multiple = Math.floor(Math.log10(tempGap)-1);//這里使用Math.floor的原因是，當Math.log10(tempGap)-1無論是正負數(shù)都需要向下取整。不能使用parseInt或其他取整邏輯代替。
multiple = Math.pow(10,multiple);//剛才是求出指數(shù)，這里求出multiple的實際值。分開兩行代碼避免有人看不懂
//3.取出鄰近較大的魔數(shù)執(zhí)行第一次計算
var tempStep = tempGap / multiple;//映射后的間隔大小
var estep;//期望得到的間隔
var lastIndex = -1;//記錄上一次取到的魔數(shù)下標，避免出現(xiàn)死循環(huán)
for(var i = 0; i < magic.length;i++){
	if(magic[i]>tempStep){
		estep = magic[i]*multiple;//取出第一個大于tempStep的魔數(shù)，并乘以multiple作為期望得到的最佳間隔
		break;
	}
}
//4.求出期望的最大刻度和最小刻度，為estep的整數(shù)倍
var maxi,mini;
function countDegree(estep){
	//這里的parseInt是我無意中寫出來的，本來我是想對maxi使用Math.floor，對mini使用Math.ceil的。這樣能向下取到鄰近的一格，不過后面發(fā)現(xiàn)用parseInt好像畫出來圖的比較好看
	maxi = parseInt(max/estep+1) * estep;//最終效果是當max/estep屬于(-1,Infinity)區(qū)間時，向上取1格，否則取2格。
	mini = parseInt(min/estep-1) * estep;//當min/estep屬于(-Infinity,1)區(qū)間時，向下取1格，否則取2格。
	//如果max和min剛好在刻度線的話，則按照上面的邏輯會向上或向下多取一格
	if(max===0) maxi = 0;//這里進行了一次矯正，優(yōu)先取到0刻度
	if(min===0) mini = 0;
	if(symmetrical&&maxi*mini<0){//如果需要正負刻度對稱且存在異號數(shù)據(jù)
		var tm = Math.max(Math.abs(maxi),Math.abs(mini));//取絕對值較大的一方
		maxi = tm;
		mini = -tm;
	}
}
countDegree(estep);
if(deviation){//如果允許誤差，即實際分段數(shù)可以不等于splitNumber，則直接結束
	var interval = fixedNum(estep);
	console.log(maxi,mini,interval);
	return;
}
//5.當正負刻度不對稱且0刻度不在刻度線上時，重新取魔數(shù)進行計算//確保其中一條分割線剛好在0刻度上。
else if(!symmetrical||maxi*mini>0){
	outter:do{
		//計算模擬的實際分段數(shù)
		var tempSplitNumber = Math.round((maxi-mini)/estep);
		//當趨勢單調性發(fā)生變化時可能出現(xiàn)死循環(huán)，需要進行校正
		if((i-lastIndex)*(tempSplitNumber-splitNumber)<0){//此處檢查單調性變化且未取到理想分段數(shù)
			//此處的校正基于合理的均勻的魔數(shù)數(shù)組，即tempSplitNumber和splitNumber的差值較小如1和2，始終取大刻度
			while(tempSplitNumber<splitNumber){//讓maxi或mini增大或減少一個estep直到取到理想分段數(shù)
				if((mini-min)<=(maxi-max)&&mini!=0||maxi==0){//在盡量保留0刻度的前提下，讓更接近最值的一邊擴展一個刻度
					mini-=estep;
				}else{
					maxi+=estep;
				}
				tempSplitNumber++;
				if(tempSplitNumber==splitNumber)
					break outter;
			}
		}
		//當魔數(shù)下標越界或取到理想分段數(shù)時退出循環(huán)
		if(i>=magic.length-1|| i<=0 || tempSplitNumber==splitNumber) break;
		//記錄上一次的魔數(shù)下標
		lastIndex = i;
		//嘗試取符合趨勢的鄰近魔數(shù)
		if(tempSplitNumber>splitNumber) estep = magic[++i]*multiple;
		else estep = magic[--i]*multiple;
		//重新計算刻度
		countDegree(estep);
	}while(tempSplitNumber!=splitNumber);
}
//6.無論計算始終把maxi-mini分成splitNumber段，得到間隔interval。不過前面的算法已經盡量的保證刻度最優(yōu)了，即interval接近或等于理想刻度estep。
maxi = fixedNum(maxi);
mini = fixedNum(mini);
var interval = fixedNum((maxi-mini)/splitNumber);
console.log(maxi,mini,interval);

export interface ScaleOption {
    /**
     * 數(shù)據(jù)最大值
     *
     * @type {(number | null)}
     * @memberof ScaleOption
     */
    max: number | null;
    /**
     * 數(shù)據(jù)最小值
     *
     * @type {(number | null)}
     * @memberof ScaleOption
     */
    min: number | null;
    /**
     * 預期分成幾個區(qū)間
     *
     * @type {number}
     * @memberof ScaleOption
     */
    splitNumber?: number;
    /**
     * 存在異號數(shù)據(jù)時正負區(qū)間是否需要對稱
     *
     * @type {boolean}
     * @memberof ScaleOption
     */
    symmetrical?: boolean;
    /**
     * 是否允許實際分成的區(qū)間數(shù)有誤差
     *
     * @type {boolean}
     * @memberof ScaleOption
     */
    deviation?: boolean;
    /**
     * 是否優(yōu)先取到0刻度
     *
     * @type {boolean}
     * @memberof ScaleOption
     */
    preferZero?: boolean;
}
export interface ScaleResult {
    max?: number;
    min?: number;
    interval?: number;
    splitNumber?: number;
}

// 雙精度浮點數(shù)有效數(shù)字為15位
const maxDecimal = 15;
/**
 * 解決js的浮點數(shù)存在精度問題，在計算出最后結果時可以四舍五入一次，刻度太小也沒有意義
 *
 * @export
 * @param {(number | string)} num
 * @param {number} [decimal=8]
 * @returns {number}
 */
export function fixedNum(num: number | string, decimal: number = maxDecimal): number {
    let str: string = "" + num;
    if (str.indexOf(".") >= 0) str = Number.parseFloat(str).toFixed(decimal);
    return Number.parseFloat(str);
}

/**
 * 判斷非Infinity非NaN的number
 *
 * @export
 * @param {*} num
 * @returns {num is number}
 */
export function numberValid(num: any): num is number {
    return typeof num === "number" && Number.isFinite(num);
}

/**
 * 計算理想的刻度值，刻度區(qū)間大小一般是[10, 15, 20, 25, 30, 40, 50, 60, 70, 80, 90, 100]中某個數(shù)字的整10倍
 *
 * @export
 * @param {ScaleOption} option
 * @returns {ScaleResult}
 */
export function scaleCompute(option: ScaleOption): ScaleResult {
    option = {
        max: null,
        min: null,
        splitNumber: 4, // splitNumber建議取4或者5等這種容易被整除的數(shù)字
        symmetrical: false,
        deviation: false,
        preferZero: true,
        ...option,
    };
    const magics: number[] = [10, 15, 20, 25, 30, 40, 50, 60, 70, 80, 90, 100, 150]; // 加入150形成閉環(huán)
    // tslint:disable-next-line: prefer-const
    let { max : dataMax, min: dataMin, splitNumber, symmetrical, deviation, preferZero } = option;
    if (!numberValid(dataMax) || !numberValid(dataMin) || dataMax < dataMin) {
        return { splitNumber };
    } else if (dataMax === dataMin && dataMax === 0) {
        return {
            max: fixedNum(magics[0] * splitNumber),
            min: dataMin,
            interval: magics[0],
            splitNumber,
        };
    } else if (dataMax === dataMin) {
        preferZero = true;
    }
    if (!numberValid(splitNumber) || splitNumber <= 0) splitNumber = 4;
    if (preferZero && dataMax * dataMin > 0) {
        if (dataMax < 0) dataMax = 0;
        else dataMin = 0;
    }
    const tempGap: number = (dataMax - dataMin) / splitNumber;
    let multiple: number = Math.floor(Math.log10(tempGap) - 1); // 指數(shù)
    multiple = Math.pow(10, multiple);
    const tempStep: number = tempGap / multiple;
    let expectedStep: number = magics[0] * multiple;
    let storedMagicsIndex: number = -1;
    let index: number; // 當前魔數(shù)下標
    for (index = 0; index < magics.length; index++) {
        if (magics[index] > tempStep) {
            expectedStep = magics[index] * multiple; // 取出第一個大于tempStep的魔數(shù)，并乘以multiple作為期望得到的最佳間隔
            break;
        }
    }
    let axisMax: number = dataMax;
    let axisMin: number = dataMin;
    function countDegree(step: number): void {
        axisMax = parseInt("" + (dataMax / step + 1)) * step; // parseInt令小數(shù)去尾 -1.8 -> -1
        axisMin = parseInt("" + (dataMin / step - 1)) * step;
        if (dataMax === 0) axisMax = 0; // 優(yōu)先0刻度
        if (dataMin === 0) axisMin = 0;
        if (symmetrical && axisMax * axisMin < 0) {
            const tm: number = Math.max(Math.abs(axisMax), Math.abs(axisMin));
            axisMax = tm;
            axisMin = -tm;
        }
    }
    countDegree(expectedStep);
    if (deviation) {
        return {
            max: fixedNum(axisMax),
            min: fixedNum(axisMin),
            interval: fixedNum(expectedStep),
            splitNumber: Math.round((axisMax - axisMin) / expectedStep),
        };
    } else if (!symmetrical || axisMax * axisMin > 0) {
        let tempSplitNumber: number;
        out: do {
            tempSplitNumber = Math.round((axisMax - axisMin) / expectedStep);
            if ((index - storedMagicsIndex) * (tempSplitNumber - splitNumber) < 0) { // 出現(xiàn)死循環(huán)
                while (tempSplitNumber < splitNumber) {
                    if ((axisMin - dataMin <= axisMax - dataMax && axisMin !== 0) || axisMax === 0) {
                        axisMin -= expectedStep;
                    } else {
                        axisMax += expectedStep;
                    }
                    tempSplitNumber++;
                    if (tempSplitNumber === splitNumber) break out;
                }
            }
            if (index >= magics.length - 1 || index <= 0 || tempSplitNumber === splitNumber) break;
            storedMagicsIndex = index;
            if (tempSplitNumber > splitNumber) expectedStep = magics[++index] * multiple;
            else expectedStep = magics[--index] * multiple;
            countDegree(expectedStep);
        } while (tempSplitNumber !== splitNumber);
    }
    axisMax = fixedNum(axisMax);
    axisMin = fixedNum(axisMin);
    const interval: number = fixedNum((axisMax - axisMin) / splitNumber);
    return {
        max: axisMax,
        min: axisMin,
        interval,
        splitNumber,
    };
}