Zoek een aanknopingspunt in de corpusindex

Uw keuze
"; foreach($bzv1_dtls as $bzv1_key => $bzv1_val) { if (strlen($bzv1_val) > 4) { $bzv1_rslt=xtrt_xxxx("xdotx".$bzv1_val,$invr_taal,"gw27"); if (count($bzv1_rslt) == 0) { $linvr_bzv1="".$bzv1_val." "; echo $linvr_bzv1; } else { $linvr_bzv1="".$bzv1_val." "; echo $linvr_bzv1; } } } ///////////////////// $aiml_rslt=xtrt_aiml($invr_bzv1,$invr_taal); foreach($aiml_rslt as $aiml_key => $aiml_val) { // echo "
".$aiml_key; $key_dtls=explode("@",$aiml_key); $aiml_resp=$key_dtls[1]; $aiml_reac=$key_dtls[2]; $aiml_array[$aa]=$aiml_resp."-".$aiml_rctie; $aa=$aa+1; similar_text($invr_bzv1, $aiml_reac,$reac_perc); similar_text($invr_bzv1, $aiml_resp,$resp_perc); $reac_perc=round($reac_perc, 0); $resp_perc=round($resp_perc, 0); // echo "
REAC PERC ".$reac_perc." AIML REAC ".$aiml_reac; // echo "
RESP PERC ".$resp_perc." AIML RESP ".$aiml_resp; // // $perc_array[$resp_perc."@".$aiml_resp."@".$aiml_reac]=$perc_array[$resp_perc."@".$aiml_resp."@".$aiml_reac]+1; $perc_array[$resp_perc."@".$aiml_resp."@".$aiml_reac]=$resp_perc; } ///////////////////// $aa=0; arsort($perc_array); // print_r($perc_array); foreach($perc_array as $aiml_key => $aiml_val) { $aa=$aa+1; if ($aa== 1) { $key_dtls=explode("@",$aiml_key); $aiml_perc=$key_dtls[0]; $aiml_resp=$key_dtls[1]; $aiml_reac=$key_dtls[2]; if ($aiml_perc > 10) { $resp_array[$aiml_reac]=$aiml_perc; // echo "
AIML RESP ".$aiml_reac." PERC ".$aiml_perc; } } } ///////////////////// $splt_rslt=xtrt_xxxx($invr_bzv1,$invr_taal,"splt"); // print_r($splt_rslt); $aa=0; foreach($splt_rslt as $splt_key => $splt_val) { $splt_itms=explode("!!",$splt_key); $perc_text=$splt_itms[3]; similar_text($invr_bzv1, $perc_text,$splt_perc); $splt_perc=round($splt_perc, 0); $text_itms=explode("@",$splt_itms[4]); // echo "
TEXT ITMS [0] ".urlencode($text_itms[0])." TEXT ITMS [1]".urlencode($text_itms[1]); if (count($text_itms) > 1 and $splt_perc > 50) { $splt_text=$text_itms[1]; if ($splt_text != null) { $resp_array[$splt_text]=$splt_perc; // echo "
RESP text ".$splt_text." PERC ".$splt_perc; } } } arsort($resp_array); // print_r($resp_array); echo "
SPLT RESPONSES ".count($resp_array); if (count($resp_array) == 0) { echo "
Ik heb geen directe reactie op ".$invr_bzv1." Misschien kunt u me helpen"; $calc_rslt=calc_text($invr_bzv1); } else { foreach($resp_array as $resp_key => $resp_val) { echo "
".$resp_key; } } /////////////////////////////// ///////////////////// $splt_rslt=xtrt_xxxx($invr_bzv1,$invr_taal,"vrag"); // print_r($splt_rslt); $aa=0; foreach($splt_rslt as $splt_key => $splt_val) { $splt_itms=explode("!!",$splt_key); $perc_text=$splt_itms[3]; similar_text($invr_bzv1, $perc_text,$splt_perc); $splt_perc=round($splt_perc, 0); $text_itms=explode("@",$splt_itms[4]); // echo "
TEXT ITMS [0] ".urlencode($text_itms[0])." TEXT ITMS [1]".urlencode($text_itms[1]); if (count($text_itms) > 1 and $splt_perc > 50) { $splt_text=$text_itms[1]; if ($splt_text != null) { $resp_array[$splt_text]=$splt_perc; // echo "
RESP text ".$splt_text." PERC ".$splt_perc; } } } arsort($resp_array); // print_r($resp_array); echo "
VRAG RESPONSES ".count($resp_array); if (count($resp_array) == 0) { echo "
Ik heb geen directe reactie op ".$invr_bzv1." Misschien kunt u me helpen"; $calc_rslt=calc_text($invr_bzv1); } else { foreach($resp_array as $resp_key => $resp_val) { echo "
".$resp_key; } } /////////////////////////////// ///////////////////// $splt_rslt=xtrt_xxxx($invr_bzv1,$invr_taal,"tref"); // print_r($splt_rslt); $aa=0; foreach($splt_rslt as $splt_key => $splt_val) { $splt_itms=explode("!!",$splt_key); $perc_text=$splt_itms[3]; similar_text($invr_bzv1, $perc_text,$splt_perc); $splt_perc=round($splt_perc, 0); $text_itms=explode("@",$splt_itms[4]); // echo "
TEXT ITMS [0] ".urlencode($text_itms[0])." TEXT ITMS [1]".urlencode($text_itms[1]); if (count($text_itms) > 1 and $splt_perc > 50) { $splt_text=$text_itms[1]; if ($splt_text != null) { $resp_array[$splt_text]=$splt_perc; // echo "
RESP text ".$splt_text." PERC ".$splt_perc; } } } arsort($resp_array); // print_r($resp_array); echo "
TREF RESPONSES ".count($resp_array); if (count($resp_array) == 0) { echo "
Ik heb geen directe reactie op ".$invr_bzv1." Misschien kunt u me helpen"; $calc_rslt=calc_text($invr_bzv1); } else { foreach($resp_array as $resp_key => $resp_val) { echo "
".$resp_key; } } /////////////////////////////// ///////////////////// $splt_rslt=xtrt_xxxx($invr_bzv1,$invr_taal,"user"); // print_r($splt_rslt); $aa=0; foreach($splt_rslt as $splt_key => $splt_val) { $splt_itms=explode("!!",$splt_key); $perc_text=$splt_itms[3]; similar_text($invr_bzv1, $perc_text,$splt_perc); $splt_perc=round($splt_perc, 0); $text_itms=explode("@",$splt_itms[4]); // echo "
TEXT ITMS [0] ".urlencode($text_itms[0])." TEXT ITMS [1]".urlencode($text_itms[1]); if (count($text_itms) > 1 and $splt_perc > 50) { $splt_text=$text_itms[1]; if ($splt_text != null) { $resp_array[$splt_text]=$splt_perc; // echo "
RESP text ".$splt_text." PERC ".$splt_perc; } } } arsort($resp_array); // print_r($resp_array); echo "
USER RESPONSES ".count($resp_array); if (count($resp_array) == 0) { echo "
Ik heb geen directe reactie op ".$invr_bzv1." Misschien kunt u me helpen"; $calc_rslt=calc_text($invr_bzv1); } else { foreach($resp_array as $resp_key => $resp_val) { echo "
".$resp_key; } } /////////////////////////////// if($invr_taal == null) { $invr_taal="nederlands"; } ////////////////////// KENNISDOMEINEN ////////////// $chbt_rslt=xtrt_xxxx("----","nederlands","base"); ksort($chbt_rslt); // print_r($chbt_rslt); foreach($resp_array as $resp_key =>$resp_val) { $rule_itms=explode("!!",$rule_key); // $perc_text=str_replace("!!"," ",$rule_key); // print_r($rule_itms); $tref_taal=$rule_itms[1]; // echo "
RULE KEY ". $rule_key." RULE VAL ".$rule_val; // echo "
PERC TEXT ". $perc_text; $tref_scre=$rule_itms[0]; $tref_chbt=$rule_itms[2]; $tref_domn=$rule_itms[3]; $tref_corp=$rule_itms[4]; $tref_datm=$rule_itms[5]; $tref_levl=$rule_itms[6]; $tref_url=$rule_itms[7]; foreach($rule_itms as $itms_key => $itms_val) { similar_text($invr_bzv1,$itms_val,$bzv1_perc); $bzv1_perc=round($bzv1_perc, 0); // echo "
ITMS VAL ".$itms_val." BZV1 PERC ".$bzv1_perc." TREF CORP ".$tref_corp; if ($bzv1_perc > 50) { $corp_array[$tref_corp."!!".$tref_chbt."!!".$tref_url]=$corp_array[$tref_corp."!!".$tref_chbt."!!".$tref_url]+1; $perc_array[$bzv1_perc]=$tref_corp."@".$tref_chbt;; } } $chbt_array[$tref_chbt]=$chbt_array[$tref_chbt]+1; $taal_array[$tref_taal]=$chbt_array[$ref_taal]+1; } // print_r($perc_array); $sw_corp=0; krsort($perc_array); foreach($perc_array as $perc_key => $perc_name) { $val_itms=explode("@",$perc_name); // print_r($val_itms); $perc_val=$val_itms[0]; $perc_chbt=$val_itms[1]; // echo "
".$perc_key. " VAL ".$perc_val." en de gesprekspartner ".$perc_chbt.""; $file_name='./data/'.$perc_val."/lnk00000.dat"; // echo "
".$file_name; if($perc_key > 50) { if (file_exists($file_name)) { echo "
De eerste 12 regels van de eerste pagina van de website van ".$perc_val." en de aangewezen gesprekspartner ".$perc_chbt." bestaat uit de volgende regels
"; echo ""; // echo "
".$perc_key. " VAL ".$perc_val.""; // echo "The file $file_name exists"; $sw_corp=1; $f = fopen($file_name, "r"); $word_count=0; $line_count=0; $nl=0; while ($line = fgets($f, 100000) and $nl < 13) { $nl=$nl+1; $str_repl_line=$line; require_once("ustr-repl-nl.php"); // echo "
".urlencode($line); $str_repl_line=trim($str_repl_line); $str_repl_line=strtolower($str_repl_line); // echo "
URL ENCODED ".urlencode($str_repl_line); if ($str_repl_line != null) { echo "";; $srelt = $perc_val; } } echo "
".$str_repl_line."
"; $corp_array[$perc_val]=$corp_array[$perc_val]+1; } else { // echo "
".$perc_val.""; } } } // print_r($corp_array); echo "

Voor Semanta zijn de volgende corpora geidentificeerd door Lingvistica:

"; ksort($corp_array); foreach($corp_array as $chbt_key => $chbt_val) { // echo "
KEY ".$chbt_key. " VAL ".$chbt_val; $domn_dtls=explode("!!",$chbt_key); $domn_corp=$domn_dtls[0]; $domn_chbt=$domn_dtls[1]; $domn_domn=$domn_dtls[2]; $domn_taal=$domn_dtls[3]; $domn_srvr=$domn_dtls[4]; // echo "
FRST LETR ".$frst_letr; // echo "
DOMN CORP ".$domn_corp; if ($invr_taal == $domn_taal) { if ($frelt !=$domn_corp[0] ) { $frst_letr="-".strtoupper($domn_corp[0])."-"; echo "
".$frst_letr; // $chbt_key[0]=$frst_letr; $ltref_domn="-".$frst_letr."-"; $frelt=$domn_corp[0]; } // echo "
CHBT KEY ". $chbt_key." CHBT VAL ".$chbt_val; // $ltref_domn="
".$chbt_key.""; $ltref_domn="-".$domn_taal."-".$domn_corp.""; echo "
".$ltref_domn; } } ?>