"editable": true
},
"source": [
- "\n",
- "\n",
"<h2 style=\"color:blue;font-size:2em\">Pollution par chauffage</h2>"
]
},
"outputs": [],
"source": [
"reload(\"../pkg\")\n",
- "p1 = computeForecast(data, indices_ch, \"Neighbors\", \"Zero\", horizon=H, simtype=\"exo\")\n",
- "p2 = computeForecast(data, indices_ch, \"Neighbors\", \"Zero\", horizon=H, simtype=\"endo\")\n",
- "p3 = computeForecast(data, indices_ch, \"Neighbors\", \"Zero\", horizon=H, simtype=\"mix\")\n",
+ "#p1 = computeForecast(data, indices_ch, \"Neighbors\", \"Zero\", horizon=H, simtype=\"exo\")\n",
+ "#p2 = computeForecast(data, indices_ch, \"Neighbors\", \"Zero\", horizon=H, simtype=\"endo\")\n",
+ "#p3 = computeForecast(data, indices_ch, \"Neighbors\", \"Zero\", horizon=H, simtype=\"mix\")\n",
"p4 = computeForecast(data, indices_ch, \"Neighbors2\", \"Zero\", horizon=H, simtype=\"exo\")\n",
"p5 = computeForecast(data, indices_ch, \"Neighbors2\", \"Zero\", horizon=H, simtype=\"endo\")\n",
- "p6 = computeForecast(data, indices_ch, \"Neighbors2\", \"Zero\", horizon=H, simtype=\"mix\")\n"
+ "p6 = computeForecast(data, indices_ch, \"Neighbors2\", \"Zero\", horizon=H, simtype=\"mix\")"
+ ]
+ },
+ {
+ "cell_type": "code",
+ "execution_count": null,
+ "metadata": {
+ "collapsed": false
+ },
+ "outputs": [],
+ "source": [
+ "getSimilarDaysIndices(1000,10,TRUE,data)"
+ ]
+ },
+ {
+ "cell_type": "code",
+ "execution_count": null,
+ "metadata": {
+ "collapsed": false
+ },
+ "outputs": [],
+ "source": [
+ "as.POSIXlt(data$getTime(1000)[1])"
]
},
{
},
"outputs": [],
"source": [
- "e_nn_exo = computeError(data, p_nn_exo, 3)\n",
- "e_nn_mix = computeError(data, p_nn_mix, 3)\n",
- "e_az = computeError(data, p_az, 3)\n",
- "e_pz = computeError(data, p_pz, 3)\n",
- "options(repr.plot.width=9, repr.plot.height=7)\n",
- "plotError(list(e_nn_mix, e_pz, e_az, e_nn_exo), cols=c(1,2,colors()[258], 4))\n",
- "\n",
- "# Noir: neighbors_mix, bleu: neighbors_exo, vert: moyenne, rouge: persistence\n",
- "\n",
- "i_np = which.min(e_nn_exo$abs$indices)\n",
- "i_p = which.max(e_nn_exo$abs$indices)"
+ "plotError(list(e4,e1,e2,e3, e5,e6), cols=c(1,2,3,4,5,6))"
]
},
{