} } } // print_r($array_corres); $margin_left = 10; $margin_top = 10; $x1 = $margin_top + 30; $y1 = 0 + $margin_left; $lg = 1000; $ecart = 300; $x2 = $x1 + $ecart; $y2 = $y1; $line1 = Tool_svg::space($y1, $x1, $lg); $line2 = Tool_svg::space($y2, $x2, $lg); //$inter1 = Tool_svg::inter($y1,$x1,$lg,$margin_left,$borne_min,$borne_max); $inter1 = Tool_svg::inter($y1, $x1, $lg, $margin_left, $borne_min, $borne_max); $inter2 = Tool_svg::inter($y2, $x2, $lg, $margin_left, 0, 1); $links = ""; $val_max = max($array_corres); foreach ($array_corres as $k2 => $nb_occ) { if ($val_max == 0) { $val = $ecart; } else { $val = $ecart - $nb_occ / $val_max * $ecart + $x1; } $links .= Tool_svg::barre($y1, $x1, $y2, $x2, $lg, $margin_left, $k2, $val); } $out_svg = "<svg version=\"1.1\"\n baseProfile=\"full\"\n xmlns=\"http://www.w3.org/2000/svg\">\n\n {$line1}\n {$line2}\n\n {$inter1}\n {$inter2}\n\n {$links}\n</svg>\n"; Tool_files::file_write($out_file, $out_svg); } //print $out_svg;
} elseif ($id2 > $id_multidoc) { break; } } } elseif ($id1 > $id_multidoc) { break; } } } $margin_left = 10; $margin_top = 10; $x1 = $margin_top + 30; $y1 = 0 + $margin_left; $lg = 1000; $x2 = $x1 + 300; $y2 = $y1; $line1 = Tool_svg::space($y1, $x1, $lg); $line2 = Tool_svg::space($y2, $x2, $lg); $inter1 = Tool_svg::inter($y1, $x1, $lg, $margin_left, $borne_min, $borne_max); $inter2 = Tool_svg::inter($y2, $x2, $lg, $margin_left, 0, 1); $links = ""; foreach ($res as $k1 => $array_k2) { foreach ($array_k2 as $k2) { $links .= Tool_svg::link($y1, $x1, $y2, $x2, $lg, $margin_left, $k2, $k2); } } $out_svg = "<svg version=\"1.1\" baseProfile=\"full\" xmlns=\"http://www.w3.org/2000/svg\">\n\n {$line1}\n {$line2}\n\n {$inter1}\n {$inter2}\n\n {$links}\n</svg>\n"; print $out_svg; ?>