";
echo $_POST['query2']." is query 2";
echo "Right click this link and save link target as to download this SVG file!
" // this rect element is the grey background of the SVG output
);
fclose($cscp);
// DATASET INTAKE, CONCEPTS ARRAY CREATION
// -------------------------------------------------
$dataexploded = $_POST['dataset'];
$dataexploded = str_replace("\r", "\n", $dataexploded); // converts all linebreaks to "\n" type
$dataexploded = preg_replace( "/(\\n)+/", "\n", $dataexploded); // reduces any number of repititious "\n"'s to one "\n"
$dataexploded = explode("\n", $dataexploded); // breaks dataset string into an array of line strings based on the linebreaks
$concepts = array(); // create concepts array
foreach ($dataexploded as $currentarray) { // look at each string in the datasetexploded array
$subarray = explode(",", $currentarray); // split the current dataset string on its ","'s
$keyname = $subarray[0];
// echo "this is the uniquelist $uniquecount ";
$matrixsqr = sqrt($uniquecount); // get the square root of that number
$matrixsqr = floor($matrixsqr) + 1; // remove any trailing decimal places and round up to accomodate a matrix point for all the unique concepts in the dataset
$matrixspacer = 3000 / $matrixsqr; // this creates a number of points to use to multiply the coordinate value by to produce equal spacing of concepts along the axis of the putput matrix (3000 is the default x,y "viewbox" attribute number written into the svg header)
$matrixspacer = $matrixspacer - 50;
// echo "$matrixspacer unique array values "
);
fwrite($cscp, // this writes a bold circle around query 2's expanded x,y
""
);
// EXECUTION OF QUERYS
// -------------------
// there is a problem with tracking the level of degrees away from the query because once you travel away from the first level of compliments you cant distuinguish the level you are at from the query1list of concepts
// BY APPENDING A CODED STRING ENTRY AS AN ARRAY ELEMENT IN THE ARRAY AT CERTIAN POINTS IN THE WHILE LOOP THE SETS OF UNIQUE CONCEPTS THAT ARE ADDED TO THE QUERY1LIST CAN BE LEVELED BY DEGREE. ITHINK THIS CAN BE DONE BY PUTTING A DEG1 STRING ON TO THE THE END OF THE ARRAY AFTER THE QUERY1 CONCEPT AND THEN WHEN THE WHILE LOOP GETS TO THE DEG1 ENTRY THE SCRIPT WILL HAVE ALREADY ADDED MORE CONCEPTS TO THE LIST AND WHEN IT GETS TO THE DEG1 IT WILL ADD A DEG2 TO THE END OF THE ARRAY LIST AND IN THIS FASHION I CAN LOOK FOR A DEGX AND QUIT OUT OF THE LOOP
$numdeg1 = 1; // this var will be a count of the levels of degrees away from the query concept the script has traveled
reset($query1list);
while (current($query1list) != null) { // this looks at the current querylist to see if it has values to process, once the pointer gets to the end of the array it will return null and exit, this works because I add the new items to test to the end of the array ahead of the current pointer
if ($numdeg1 > 4) { // this if statement looks to see if the number of degrees away from the query has become to large and if so will finish out the master while loop
next($query1list);
} elseif (current($query1list) == "deg1") { //check to see if there is a degree delimiting entry string for the current array entry
$numdeg1 = $numdeg1 + 1; // this increments the degree level count
$query1list[] = "deg1"; // this puts a new degree level delimiting entry string at the end of the queryxlist array
next($query1list);
}
if (in_array(current($query1list), $query1totalconcepts)) { // this tests to see if i have processed this concept already this avoids infinite loops
next($query1list);
} else {
$query1totalconcepts[] = current($query1list);
$q1tcfull[] = current($query1list);
if (array_key_exists(current($query1list), $concepts)) { // this tests to see if the current concept has a primary concept value because if so lines will need to be drawn to that primary concepts subject compliments
$cscp = fopen($cscpname, "a"); // opens the output file for appending
$keyname = current($query1list); // this puts the current concept into a string var for use later
if($unique[$keyname][placed] == 0){ // this if statement checks to see if the xpos value has been moved to a new position based on the level of degree away from the query in the tree if the value is a 0 then the xpos has not been altered and should be
$movexpos = $matrixstep * $numdeg1; // this produces a number by multiplying the matrixstep by the current number of degrees from the concept to make the stepped look of the output
$unique[$keyname][xpos] = $movexpos; // this assigns the new value to the xpos of the unique concept
$unique[$keyname][placed] = 1; // setting the placed value to 1 will ensure that when the script finds this concept again it will not move its position a second time
}
$startx = $unique[$keyname][xpos]; // these two statements put the x and y position into vars for plotting the start of the lines to be drawn
$starty = $unique[$keyname][ypos]; // the x and y position is multiplied by the matrix expanding number to get the final positions for display
foreach ($concepts[current($query1list)] as $subarr) { // this will itterate through all of the subject compliments in the current array
if($unique[$subarr][placed] == 0){ // this if statement checks to see if the xpos value has been moved to a new position based on the level of degree away from the query in the tree if the value is a 0 then the xpos has not been altered and should be
$movexpos = $matrixstep * $numdeg1; // this produces a number by multiplying the matrixstep by the current number of degrees from the concept to make the stepped look of the output
$unique[$subarr][xpos] = $movexpos; // this assigns the new value to the xpos of the unique concept
$unique[$subarr][placed] = 1; // setting the placed value to 1 will ensure that when the script finds this concept again it will not move its position a second time
}
$endx = $unique[$subarr][xpos]; // these two statements put the x and y position into vars for plotting the end of the lines to be drawn
$endy = $unique[$subarr][ypos]; // the x and y position is multiplied by the matrix expanding number to get the final positions for display
fwrite($cscp, // this will write out an SVG line from the expanded matrix position of the current primary concept to the current subject compliments expanded matrix position
""
);
foreach ($concepts as $key => $arrayvalues) { // this foreach looks at all of the values in the arays in the concepts array and compares these subarray values to the common concepts in the intersection array and then draws lines back from the intersection values to any primary concepts
if (in_array($common, $concepts[$key]) == true) {
$startx = $unique[$common][xpos];
$starty = $unique[$common][ypos];
$endx = $unique[$key][xpos];
$endy = $unique[$key][ypos];
fwrite($cscp, // this draws a line from the subject compliment to its primary concept as a dotted magenta line
""
);
}
}
}
// POPULATE MATRIX
// ---------------
$cscp = fopen($cscpname, "a");
foreach ($unique as $key => $value) { // this foreach loop writes SVG output for each of the matrix points that have an associated unique concept
// echo $key." is the key for the following concept coordinates"
);
if (in_array($key, $intersection)) {
fwrite($cscp, // this writes the current name of the unique concept from the unique array into the output file
"".$name." "
);
} else if ($key == $_POST['query1']) {
fwrite($cscp, // this writes the current name of the unique concept from the unique array into the output file
"".$name." "
);
} else if ($key == $_POST['query2']) {
fwrite($cscp, // this writes the current name of the unique concept from the unique array into the output file
"".$name." "
);
} else {
fwrite($cscp, // this writes the current name of the unique concept from the unique array into the output file
"".$name." "
);
}
// echo $unique[$key][xpos]." This image was created by Pointsware, which is developed and maintained by Jeremiah Colonna-Romano at http://www.jeremiahcolonnaromano.com/pointsware.php
The Pointsware software and source code is licensed under Creative Commons BY-NC-SA with all rights and restrictions.
Query 1 tree
Query 2 tree
Common to both
Shows link between a common and any of its primary concepts
"
);
fclose($cscp);
// OUTPUT TO SCREEN
// ----------------
$svgoutput = file_get_contents("http:\/\/www.jeremiahcolonnaromano.com\/".$cscpname);
echo "