FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-02-25 16:05:19 +00:00
Code Issues Releases Wiki Activity

76_SolarForecast: Consider upper and lower deviation limit AI to API forecast

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@28465 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
nasseeder1 2024-02-02 12:35:37 +00:00
parent 8ef4fbb640
commit 4cd92f573b
1 changed files with 15 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
fhem/FHEM/76_SolarForecast.pm
View File

@ -157,7 +157,7 @@ BEGIN {
# Versions History intern
my %vNotesIntern = (
"1.14.2" => "02.02.2024 fix warning ",
"1.14.2" => "02.02.2024 fix warning, _transferAPIRadiationValues: Consider upper and lower deviation limit AI to API forecast ",
"1.14.1" => "01.02.2024 language support for ___setConsumerPlanningState -> supplement, fix setting 'swoncond not met' ",
"1.14.0" => "31.01.2024 data maintenance, new sub _addDynAttr for adding attributes at runtime ".
"replace setter currentWeatherDev by attr ctrlWeatherDev1, new data with sub CircularSumVal ".
@ -316,6 +316,8 @@ my $airaw = $root."/FHEM/FhemUtils/AIraw_SolarForecast_";
my $aitrblto = 7200; # KI Training BlockingCall Timeout
my $aibcthhld = 0.2; # Schwelle der KI Trainigszeit ab der BlockingCall benutzt wird
my $aistdudef = 1095; # default Haltezeit KI Raw Daten (Tage)
my $aiDevUpLim = 150; # obere Abweichungsgrenze (%) AI von API Prognose
my $aiDevLowLim = 50; # untere Abweichungsgrenze (%) AI von API Prognose
my $calcmaxd = 30; # Anzahl Tage die zur Berechnung Vorhersagekorrektur verwendet werden
my @dweattrmust = qw(TTT Neff R101 ww SunUp SunRise SunSet); # Werte die im Attr forecastProperties des Weather-DWD_Opendata Devices mindestens gesetzt sein müssen
@ -5764,16 +5766,23 @@ sub _transferAPIRadiationValues {
$data{$type}{$name}{nexthours}{$time_str}{rad1h} = $rad;
my ($err, $pvaifc) = aiGetResult ($params); # KI Entscheidungen abfragen
my $useai = 0;
my $pvfc;
if (!$err) {
$data{$type}{$name}{nexthours}{$time_str}{pvaifc} = $pvaifc; # durch AI gelieferte PV Forecast
$data{$type}{$name}{nexthours}{$time_str}{pvfc} = $pvaifc;
$data{$type}{$name}{nexthours}{$time_str}{aihit} = 1;
my $aivar = 100 * $pvaifc / $est;
if ($aivar >= $aiDevLowLim && $aivar <= $aiDevUpLim) { # Abweichung AI von Standardvorhersage begrenzen
$data{$type}{$name}{nexthours}{$time_str}{pvaifc} = $pvaifc; # durch AI gelieferte PV Forecast
$data{$type}{$name}{nexthours}{$time_str}{pvfc} = $pvaifc;
$data{$type}{$name}{nexthours}{$time_str}{aihit} = 1;
$pvfc = $pvaifc;
$pvfc = $pvaifc;
$useai = 1;
}
}
else {
if (!$useai) {
delete $data{$type}{$name}{nexthours}{$time_str}{pvaifc};
$data{$type}{$name}{nexthours}{$time_str}{pvfc} = $est;
$data{$type}{$name}{nexthours}{$time_str}{aihit} = 0;