Phpdiagram - Logarithmic Scale.html

Logarithmic Scale.html:

<HTML><HEAD></HEAD>
<BODY bgcolor="#eeeeee">
<table border=1><tr><td><IMG src="logarithmic_scale.png" usemap="#map1" border=0></td></tr></table>
<map name="map1">
<area shape=circle coords='570, 40, 5' title='2002: 147344723 hosts' alt='2002: 147344723 hosts'>
<area shape=circle coords='535, 51, 5' title='2001: 109574429 hosts' alt='2001: 109574429 hosts'>
<area shape=circle coords='500, 67, 5' title='2000: 72398092 hosts' alt='2000: 72398092 hosts'>
<area shape=circle coords='465, 86, 5' title='1999: 43230000 hosts' alt='1999: 43230000 hosts'>
<area shape=circle coords='430, 100, 5' title='1998: 29670000 hosts' alt='1998: 29670000 hosts'>
<area shape=circle coords='395, 123, 5' title='1997: 16146000 hosts' alt='1997: 16146000 hosts'>
<area shape=circle coords='360, 143, 5' title='1996: 9472000 hosts' alt='1996: 9472000 hosts'>
<area shape=circle coords='325, 168, 5' title='1995: 4852000 hosts' alt='1995: 4852000 hosts'>
<area shape=circle coords='290, 197, 5' title='1994: 2217000 hosts' alt='1994: 2217000 hosts'>
<area shape=circle coords='255, 220, 5' title='1993: 1200000 hosts' alt='1993: 1200000 hosts'>
<area shape=circle coords='220, 239, 5' title='1992: 727000 hosts' alt='1992: 727000 hosts'>
<area shape=circle coords='185, 253, 5' title='1991: 500000 hosts' alt='1991: 500000 hosts'>
<area shape=circle coords='150, 273, 5' title='1990: 290000 hosts' alt='1990: 290000 hosts'>
<area shape=circle coords='115, 321, 5' title='1989: 80000 hosts' alt='1989: 80000 hosts'>
<area shape=polygon coords='534, 48, 569, 37, 571, 43, 536, 54' title='internet hosts' alt='internet hosts'>
<area shape=polygon coords='499, 64, 534, 48, 536, 54, 501, 70' title='internet hosts' alt='internet hosts'>
<area shape=polygon coords='464, 83, 499, 64, 501, 70, 466, 89' title='internet hosts' alt='internet hosts'>
<area shape=polygon coords='429, 97, 464, 83, 466, 89, 431, 103' title='internet hosts' alt='internet hosts'>
<area shape=polygon coords='393, 120, 428, 97, 432, 103, 397, 126' title='internet hosts' alt='internet hosts'>
<area shape=polygon coords='359, 140, 394, 120, 396, 126, 361, 146' title='internet hosts' alt='internet hosts'>
<area shape=polygon coords='323, 166, 358, 141, 362, 145, 327, 170' title='internet hosts' alt='internet hosts'>
<area shape=polygon coords='288, 195, 323, 166, 327, 170, 292, 199' title='internet hosts' alt='internet hosts'>
<area shape=polygon coords='253, 217, 288, 194, 292, 200, 257, 223' title='internet hosts' alt='internet hosts'>
<area shape=polygon coords='219, 236, 254, 217, 256, 223, 221, 242' title='internet hosts' alt='internet hosts'>
<area shape=polygon coords='184, 250, 219, 236, 221, 242, 186, 256' title='internet hosts' alt='internet hosts'>
<area shape=polygon coords='149, 270, 184, 250, 186, 256, 151, 276' title='internet hosts' alt='internet hosts'>
<area shape=polygon coords='113, 319, 148, 271, 152, 275, 117, 323' title='internet hosts' alt='internet hosts'>
<area shape=polygon coords='78, 358, 113, 319, 117, 323, 82, 362' title='internet hosts' alt='internet hosts'>
</map>
<code>
<?php
 include ("diagram.php");
 
 $Hosts=array(28174, 80000, 290000, 500000, 727000, 1200000, 2217000, 4852000, 9472000, 16146000, 29670000, 43230000, 72398092, 109574429, 147344723);
 $log10=log(10);
 
 function LogScale($vv)
 { if (($vv>3)||($vv<-3)) return("10^".$vv);
   if ($vv>=0) return(round(exp($vv*log(10))));
   else return(1/round(exp(-$vv*log(10))));
 }
 
 $D=new Diagram();
 $D->Img=@ImageCreate(600, 400) or die("Cannot create a new GD image.");
 ImageColorAllocate($D->Img, 255, 255, 255); //background color
 
 $D->SetFrame(80, 40, 570, 360);
 $D->SetBorder(1988, 2002, log10($Hosts[0]), log10($Hosts[14]));
 $D->SetText("Year", "Hosts", "Internet growth");
 $D->XGridDelta=2;
 $D->XSubGrids=2;
 $D->YGridDelta=1;
 $D->YSubGrids=-1;
 $D->YScale="function LogScale";
 $D->SetGridColor("#FFFFFF", "#EEEEEE");
 $D->Draw("#DDDDDD", "#000000", true);
 
 for ($n=1; $n<count($Hosts); $n++)
   $D->Line($D->ScreenX(1987+$n), $D->ScreenY(log10($Hosts[$n-1])), $D->ScreenX(1988+$n), $D->ScreenY(log10($Hosts[$n])), "#0000ff", 2, "internet hosts");
 
 for ($n=1; $n<count($Hosts); $n++)
   $D->Dot($D->ScreenX(1988+$n), $D->ScreenY(log10($Hosts[$n])), 10, 1, "#ff0000", (1988+$n).": ".$Hosts[$n]." hosts");
 
 ImagePng($D->Img, "logarithmic_scale.png");
 ImageDestroy($D->Img);
 ?>
 <HTML><HEAD></HEAD>
 <BODY bgcolor="#eeeeee">
 <table border=1><tr><td><IMG src="logarithmic_scale.png" usemap="#map1" border=0></td></tr></table>
 <map name="map1">
 <?echo $D->ImgMapData?>
 </map>
 </BODY>
 </HTML>
</code>
</BODY>
</HTML>

Other Graphs And Charts Scripts:

Advgraphtrial

Php3dlib

Phpdiagram

Phpdiagram > Logarithmic Scale.html

Archive Content:

Logarithmic Scale.html:

Other Graphs And Charts Scripts: