HD 183143 Spectrum Plot

"; $mytime=time(); // Preliminary setup for gnuplot $instfilename = "tmp/plot" . $mytime . ".in"; $INSTFILE = fopen($instfilename,"w"); $gifname = "tmp/plot" . $mytime . ".png"; fputs($INSTFILE,"set key\n"); fputs($INSTFILE,"set xlabel \"$xlabel\"\n"); fputs($INSTFILE,"set ylabel \"$ylabel\"\n"); fputs($INSTFILE,"set terminal png color \n"); fputs($INSTFILE,"set output \"$gifname\"\n"); if (!$usery1 && !$usery2) { $usery1 = 0; $usery2 = 1.2; } if ($userx1 || $userx2 || $usery1 || $usery2) { fputs($INSTFILE,"plot [$userx1:$userx2] [$usery1:$usery2] "); } else { fputs($INSTFILE,"plot "); } $starcount = 2; // Prepare offsets, if not already entered by user $offsetcount = count($Offset); if ($offsetcount==0) { for ($i=0; $i<$starcount; $i++) {$Offset[$i]=0.1*$i; } } $velocitycount = count($Velocity); if ($velocitycount==0) { for ($i=0; $i<$starcount; $i++) {$Velocity[$i]=0; } } // Now, for each star selected: $Spec_File[0] = "HD183143.txt"; $StarNick[0]="HD183143"; $gfilename[0] = "data/" . $Spec_File[0]; fputs($INSTFILE," \"$gfilename[0]\" using ($1*(1.0+$Velocity[0]/300000.0)):($2-$Offset[0]) "); fputs($INSTFILE,"title '$StarNick[0]' with lines "); $Spec_File[1] = "bOri.txt"; $StarNick[1]="beta Ori"; $gfilename[1] = "data/" . $Spec_File[1]; fputs($INSTFILE,", "); fputs($INSTFILE," \"$gfilename[1]\" using ($1*(1.0+$Velocity[1]/300000.0)):($2-$Offset[1]) "); fputs($INSTFILE,"title '$StarNick[1]' with lines "); fputs($INSTFILE,"\n"); fclose($INSTFILE); if (1==1) { echo `/usr/bin/gnuplot < $instfilename`; echo ""; echo ""; echo "
"; } echo "
"; echo "

Redraw with plotting range:
"; echo "x = "; echo "to
"; echo "y = "; echo "to
"; echo "

"; echo ""; for ($i=0; $i<$starcount; $i++) { echo ""; echo ""; echo ""; } echo "
StarOffsetVelocity
$StarNick[$i]"; echo "
"; ?>

Return to HD 183143 Data Page