$line)
{
$data_cell_ev=explode("\t",$line);
foreach ($data_cell_ev as $ld)
{
$ldd=trim($ld);
if($ldd !="")
{
$ev_arr[$cev]=$ldd;
$cev++;
//echo "Line #{$line_num} : " . htmlspecialchars($ldd) . "
\n";
}
}
}
$lf=$dir."$keyval"."vardata.txt";
$linesd = file("$lf");
$cevdata=0;
// Loop through our array, show HTML source as HTML source; and line numbers too.
foreach ($linesd as $line_num => $line)
{
$data_cell_ev=explode("\t",$line);
foreach ($data_cell_ev as $ld)
{
$ldd=trim($ld);
if($ldd !="")
{
$evdata_arr[$cevdata]=$ldd;
$cevdata++;
//echo "Line #{$line_num} : " . htmlspecialchars($ldd) . "
\n";
}
}
}
////////////////////////////////////Read data from net_figure file///////////////////////Graphp Display/////////////////////////////////////////////
$matfile=$dir.$keyval."net_figure_new.txt";
$data_val="";
$matrix=file("$matfile");
$matrix1=file_get_contents("$matfile"); //file("$matfile");
$str_arrmat=array();
$str_arrmat=explode("\n",$matrix1);
$node=trim($str_arrmat[1]);
if($str_arrmat[2]=="" || $matrix1=="")
{
?>
Error: Unable to display your network structure.
1)
$evd=levelmap($evd,$data_read[$i][0],$levelmap);
break;
}
}
if($evd!=-9999)//with evidence
{
$datamat=explode("\t",$str_arrmat[$r_index]);
$data_read[$i][$col_in]=trim($datamat[0]); //x data
$col_in++;
$data_read[$i][$col_in]=trim($datamat[1]); //y data
$col_in++;
$r_index++; // increment to point next data
}
else //without evidence
{
if($nodetype==1) //type=coninuous
{
for($j=1;$j<=101;$j++)
{
$datamat=explode("\t",$str_arrmat[$r_index]);
$data_read[$i][$col_in]=trim($datamat[0]); //x data
$col_in++;
$data_read[$i][$col_in]=trim($datamat[1]); //y data
$col_in++;
$r_index++; // increment to point next data
}
}
if($nodetype>1) //type=discrete
{
$iter=$datamat[1];
for($j=1;$j<=$iter;$j++)
{
$datamat=explode("\t",$str_arrmat[$r_index]);
$data_read[$i][$col_in]=trim($datamat[0]); //x data
$data_read[$i][$col_in]=levelmap($data_read[$i][$col_in],$data_read[$i][0],$levelmap);
$col_in++;
$data_read[$i][$col_in]=trim($datamat[1]); //y data
$col_in++;
$r_index++; // increment to point next data
}
}
}
}
$matfile_old=$dir.$keyval."net_figure.txt";
$data_val="";
$matrix_old=file("$matfile_old");
$matrix1_old=file_get_contents("$matfile_old"); //file("$matfile");
$str_arrmat_old=array();
$str_arrmat_old=explode("\n",$matrix1_old);
$datamat_old=array();
$data_read_old=array();
$node_old=trim($str_arrmat_old[0]);
$r_index_old=$node_old+2;
for($i=0;$i<$node_old;$i++)
{
$datamat_old=explode("\t",$str_arrmat_old[$r_index_old]);
$data_read_old[$i][0]=trim($datamat_old[0]); //name
$data_read_old[$i][1]=trim($datamat_old[1]); //datatype
$col_in_old=2;
$r_index_old+=4;
if($datamat_old[1]==1) //type=continuous
{
for($j=1;$j<=101;$j++)
{
$datamat_old=explode("\t",$str_arrmat_old[$r_index_old]);
$data_read_old[$i][$col_in_old]=trim($datamat_old[0]); //x data
$col_in_old++;
$data_read_old[$i][$col_in_old]=trim($datamat_old[1]); //y data
$col_in_old++;
$r_index_old++; // increment to point next data
}
}
if($datamat_old[1]>1) //type=discrete
{
$iter=$datamat_old[1];
for($j=1;$j<=$iter;$j++)
{
$datamat_old=explode("\t",$str_arrmat_old[$r_index_old]);
$data_read_old[$i][$col_in_old]=trim($datamat_old[0]); //x data
//$data_read_old[$i][$col_in_old]='y';
$data_read_old[$i][$col_in_old]=levelmap($data_read_old[$i][$col_in_old],$data_read_old[$i][0],$levelmap);
$col_in_old++;
$data_read_old[$i][$col_in_old]=trim($datamat_old[1]); //y data
$col_in_old++;
$r_index_old++; // increment to point next data
}
}
}
////////////////////////////////////////////////Graphviz data read////////////////////////////////////////////////////////////////////////////////
$grv=$dir.$keyval."graphviz.txt";
$line=shell_exec('/usr/bin/dot -Tplain -y '.$grv);
$grviz_name_list=array();
//$g_file_name="./data/".$keyval."grviz_name_file.txt";
$g_file_name=$dir.$keyval."grviz_name_file.txt";
$grviz_name=file_get_contents("$g_file_name");
$grviz_name_list=explode("\n",$grviz_name);
$str_arrname=array();
$str_arrname=explode("\n",$line);
$data=array();
$ID_data=array();
$i=0;
$ii=0;
foreach($str_arrname as $row)
{
$i++;
if($i>1)
{
$data=explode(" ",$row);
$j=0;
$k=0;
$flag=0;
foreach($data as $cell)
{
$j++;
$cell=trim($cell);
if($j==1 && $cell=="node")
{
$flag=1;
}
if($j>1 && $j<5 && $flag==1)
{
if($j==2)
$ID_data[$ii][$k]=$grviz_name_list[$cell];
else
$ID_data[$ii][$k]=round($cell/10*900);
$k++;
}
}
if($flag==1)
{
$ID_data[$ii][3]=$ID_data[$ii][1]+100;
$ID_data[$ii][4]=$ID_data[$ii][2]+150;
$ID_data[$ii][5]=$ID_data[$ii][1]+100;
$ID_data[$ii][6]=$ID_data[$ii][2];
$ii++;
}
}
}
$nnode=$ii;
$edge_data=array();
$i=0;
$ii=0;
foreach($str_arrname as $row)
{
$i++;
if($i>1)
{
$data=explode(" ",$row);
$j=0;
$flag=0;
$number_of_point=0;
$index=0;
foreach($data as $cell)
{
$j++;
$cell=trim($cell);
if($j==1 && $cell=="edge")
{
$flag=1;
}
if($j==2 && $flag==1)
{
for($k=0;$k<$nnode;$k++)
{
$cell=$grviz_name_list[$cell];
if($cell==$ID_data[$k][0])
{
$edge_data[$ii][0]=$ID_data[$k][3];
$edge_data[$ii][1]=$ID_data[$k][4];
}
}
}
else if($j==3 && $flag==1)
{
for($k=0;$k<$nnode;$k++)
{
if($cell==$ID_data[$k][0])
{
$edge_data[$ii][2]=$ID_data[$k][5];
$edge_data[$ii][3]=$ID_data[$k][6];
}
}
}
else if($j==4 && $flag==1)
{
$edge_data[$ii][4]=$cell;
$number_of_point=$cell*2;
$index=5;
}
else if($j>4 && $number_of_point>0 && $flag==1)
{
if(($j%2)!=0)
$edge_data[$ii][$index]=round($cell/10*900)+60;
else
$edge_data[$ii][$index]=round($cell/10*900)+48;
$number_of_point--;
$index++;
}
}
if($flag==1)
{
$ii++;
}
}
}
$nedges=$ii;
?>