Elförbrukning och temperatur i samma graf?
Postat: 04 feb 2014, 00:22
Hej.
Jag skulle vilja få fram en graf som visar både elförbrukning och temperatur, jag lyckas få in dom i samma graf men temperaturen visas bara som ett streck på botten.
Kan man få en graf som visar 2 olika "vertical-label" och båda ligger centrerat på grafen?
Jag lyckas inte heller få till Max, Min, Medel och Nu värderna på elen.
så här ser min kod ut
och så här blir grafen
Jag skulle vilja få fram en graf som visar både elförbrukning och temperatur, jag lyckas få in dom i samma graf men temperaturen visas bara som ett streck på botten.
Kan man få en graf som visar 2 olika "vertical-label" och båda ligger centrerat på grafen?
Jag lyckas inte heller få till Max, Min, Medel och Nu värderna på elen.
så här ser min kod ut
Kod: Markera allt
#!/usr/bin/perl
sleep 25;
use RRDs;
my $cur_time = time();
my $start_time = $cur_time - 86400; #604800=7*24 86400= 24h 172800=48h
RRDs::graph "/var/www/et",
"--start= $start_time",
"--end= $cur_time",
"--title= Temperatur i Garage, Vardagsrum & Kök",
"--height= 600",
"--width= 1000",
"--vertical-label= °C",
# "--vertical-label= Watt",
"DEF:OutsideTemp=//home/anders/rrddata/outside_temp.rrd:outsidetemp:AVERAGE",
"DEF:IndoorTemp=/home/anders/rrddata/indoor_temp.rrd:outsidetemp:AVERAGE",
"DEF:KitchenTemp=/home/anders/rrddata/kitchen_temp.rrd:kitchentemp:AVERAGE",
"DEF:energi=/home/anders/energi/energi.rrd:energi:AVERAGE",
"COMMENT:\t\t\t\t\tNu Medel Max Min\\n",
# "HRULE:0#0000FF",
"LINE1:OutsideTemp#0000FF:Garage\t\t\t",
"GPRINT:OutsideTemp:LAST:%6.1lf",
"GPRINT:OutsideTemp:AVERAGE:%6.1lf",
"GPRINT:OutsideTemp:MAX:%6.1lf",
"GPRINT:OutsideTemp:MIN:%6.1lf\\n",
# "HRULE:18#00ff00",
"LINE1:IndoorTemp#00FF00:Vardagsrum\t\t\t",
"GPRINT:IndoorTemp:LAST:%6.1lf",
"GPRINT:IndoorTemp:AVERAGE:%6.1lf",
"GPRINT:IndoorTemp:MAX:%6.1lf",
"GPRINT:IndoorTemp:MIN:%6.1lf\\n",
# "HRULE:18#ff0000",
"LINE1:KitchenTemp#ff0000:Kök\t\t\t\t",
"GPRINT:KitchenTemp:LAST:%6.1lf",
"GPRINT:KitchenTemp:AVERAGE:%6.1lf",
"GPRINT:KitchenTemp:MAX:%6.1lf",
"GPRINT:KitchenTemp:MIN:%6.1lf\\n",
"LINE1:energi#b500ff:Energi\t\t\t",
"CDEF:W=energi,3600,*",
# "AREA:W#f62424",
"LINE2:W#000000",
"CDEF:energiK=energi,1000,/",
# "VDEF:value_sum=energi,TOTAL:%6.1lf",
"GPRINT:energi:LAST:%6.1lf",
"GPRINT:energi:AVERAGE:%6.1lf",
"GPRINT:energi:MAX:%6.1lf",
"GPRINT:energi:MIN:%6.1lf\\n";
my $err=RRDs::error;
if ($err) {print "problem generating the graph: $err\n";}
print "Done!\n"