PHP CODE SENTIMEN ANALISIS TFIDF

Menggunakan Kosnep TF IDF  SASTRAWI

<style>
#table {
    font-family: "Trebuchet MS", Arial, Helvetica, sans-serif;
    border-collapse: collapse;
    width: 100%;
background-color:#ddd;

}

#table td, #table th {
    border: 1px solid #696969;
    padding: 8px;
}



#table th {
padding-top: 12px;
    padding-bottom: 12px;
    text-align: left;
    background-color: #A9A9A9;
    color: white;
}
</style>

    <link rel="stylesheet" href="jsacor/jquery-ui.css">
    <link rel="stylesheet" href="resources/demos/style.css">
    <script src="jsacor/jquery-1.12.4.js"></script>
    <script src="jsacor/jquery-ui.js"></script>
    <script>
    $( function() {
    $( "#accordion" ).accordion({
    collapsible: true
    });
    } );
    </script>


<?php

$id_pengujian=$_GET["id"];
$sql="select * from `$tbpengujian` where `id_pengujian`='$id_pengujian'";
$d=getField($conn,$sql);
$id_pengujian=$d["id_pengujian"];
$tgl=$d["tgl"];
$jam=$d["jam"];
$komentar0=$d["komentar"];
$penilaian=$d["penilaian"];
$keterangan=$d["keterangan"];
$komentar=getNorm($komentar0);
$judul=$komentar;
?>


<div id="accordion">
  <h4>Info Data Pengujian</h4>
  <div>
<table width="517">
        <tr>
          <td width="166" ><label for="id_pengujian">Id Pengujian</label>
          <td width="19">:
          <td width="397" colspan="2"><b><?php echo $id_pengujian;?></b>
        </tr>
        <tr>
          <td ><label for="komentar0">Komentar</label>
          <td>:
          <td><?php echo $komentar0;?></td>
        </tr>

  <tr>
          <td ><label for="komentar">Stemming</label>
          <td>:
          <td><?php echo $komentar;?></td>
        </tr>
    <tr>
<td><label for="penilaian">Kategori</label>
<td>:<td colspan="2"><?php echo $kategori;?>
</td></tr>
        <tr>
          <td height="24"><label for="keterangan">Keterangan</label>
        <td>:<td colspan="2"><?php echo $keterangan;?></td></tr>
</table>

</div>

<?php
require_once __DIR__ . '/vendor/autoload.php';

error_reporting(0);
$initos = new \Sastrawi\Stemmer\StemmerFactory();
$bikinos = $initos->createStemmer();
$stemming=$bikinos->stem($judul);
$stemmingnew=strtolower($stemming);

$ak=getStopNumber();
$ar=getStopWords();
$wordStop=$stemmingnew;
for($i=0;$i<count($ar);$i++){
 $wordStop =str_replace($ar[$i]." ","", $wordStop);
}

for($i=0;$i<count($ak);$i++){
 $wordStop =str_replace($ak[$i],"", $wordStop);
}
$juduluji=str_replace("  "," ", $wordStop);
//=====================================================
 $stemming=$juduluji;
 $arAsli=explode(".",$stemming);
 $jumk=count($arAsli);

 $AR=explode(" ",$stemming);
 $AR=array_unique($AR);

$m=0;
for($i=0;$i<count($AR);$i++){
 if(strlen($AR[$i])>1){
  $arUnix[$m]=$AR[$i];
  $m++;
}
 }
 //======================================



 $sql="select * from `$tbkategori`  order by `id_kategori` asc limit 0,3";
$arr=getData($conn,$sql);
$i=0;
$arStem[0]=$stemming;
$gabungan=$stemming." ";
foreach($arr as $d) {
$id_kategori0=$d["id_kategori"];
$kalimat=$d["stemming"];
$kalimat0=$d["stemming"];
$kategori0=$d["kategori"];

$arKode[$i]=$id_kategori0;
$arKat[$i]=$d["kategori"];


$arAslidoc[$i]=$kalimat0;

//==================

$stemming2=$bikinos->stem($kalimat0);
$stemmingnew2=strtolower($stemming2);
$wordStop2=$stemmingnew2;
for($y=0;$y<count($ar);$y++){
$wordStop2 =str_replace($ar[$y]." ","", $wordStop2);
}

for($y=0;$y<count($ak);$y++){
$wordStop2 =str_replace($ak[$y],"", $wordStop2);
}
$kalimatfilter=str_replace("  "," ", $wordStop2);

//==================
$gabungan.=$kalimatfilter." ";
$arStem[$i+1]=$kalimatfilter;
$arDoc[$i]=$kalimatfilter;
$arKe[$i]="Data ke-".($i+1);
$TOT[$i]=0;
$i++;
}
$jumk=$i;
 //======================================


 $arAsli=explode(" ",$gabungan);
  $arUnix0=array_unique($arAsli);

  $ii=0;
  for($i=0;$i<count($arUnix0);$i++){
  if($arUnix0[$i]==""){}
  else{
  $arUnix[$ii]=$arUnix0[$i];
  $ii++;
}
  }

 $jumb=count($arUnix);

echo"<table width='300%' border='1'>";
echo"<tr><td>Kata";
echo"<td>Q";
 for($i=0;$i<$jumk;$i++){
  $u=$i+1;
  echo"<td>D".$u;
 }
 echo"<td>df";
 echo"<td>IDF";
 echo"<td>QDF";
 for($i=0;$i<$jumk;$i++){
  $u=$i+1;
  echo"<td>QD".$u;
 }

  for($i=0;$i<$jumk;$i++){
  $u=$i+1;
  echo"<td>QDFD".$u;
 }

echo"<td>Q²";
  for($i=0;$i<$jumk;$i++){
  $u=$i+1;
  echo"<td>D²".$u;
 }



echo"</tr>";

 $bar=count($arUnix);
 for($i=0;$i<$bar;$i++){
  $kata=$arUnix[$i];
  $hitung=0;
 echo"<tr><td>".$kata."</td>";
 $jumada=0;

   for($j=0;$j<$jumk+1;$j++){
    $ada=getHit($kata,$arStem[$j]);
    $M[$i][$j]=$ada;
    if($ada>0){
$jumada++;
}
echo"<td>".$ada;
   }
 // $log=log($jumk+1,10)/$jumada;
  $log=log(($jumk)/$jumada,10);
 $log=abs($log);
 echo"<td>$jumada</td>";//idf
 echo"<td>log($jumk/$jumada)=$log";

   for($j=0;$j<$jumk+1;$j++){
$N[$i][$j]=$M[$i][$j] * $log;
$N2[$i][$j]=pow($N[$i][$j],2);

$TOT[$j]=$TOT[$j]+$N[$i][$j];
echo "<td>".$N[$i][$j];
   }
 
  for($j=1;$j<$jumk+1;$j++){
    $NN[$i][$j-1]=$N[$i][0] * $N[$i][$j];
    echo "<td>".$NN[$i][$j-1];
   }


  for($j=0;$j<$jumk+1;$j++){
    echo "<td>".$N2[$i][$j];
   }
 
 echo"</tr>";
 }//for i


   for($j=0;$j<$jumk;$j++){//kolom
  $TOT1[$j]=0;
  for($k=0;$k<$bar;$k++){//baris
    $TOT1[$j]+=$NN[$k][$j];
}
   }

  for($j=0;$j<$jumk+1;$j++){
$TOT2[$j]=0;
for($k=0;$k<$bar;$k++){//baris
$TOT2[$j]+=$N2[$k][$j];
}
   }
 
//------------------------------------
echo"<tr><td>Kata";
echo"<td>Q";
 for($i=0;$i<$jumk;$i++){
  $u=$i+1;
  echo"<td>D".$u;
 }
 echo"<td>df";
 echo"<td>IDF";
 echo"<td>QDF";
 for($i=0;$i<$jumk;$i++){
  $u=$i+1;
  echo"<td>QD".$u;
 }

  for($i=0;$i<$jumk;$i++){
  echo"<td>".$TOT1[$i];
 }

  for($i=0;$i<$jumk+1;$i++){
  echo"<td>".$TOT2[$i];
 }



echo"</tr>";

echo"</table>";

?>


</div>


</div>

Algoritma Fuzzy Cmeans

PROSES PHP FUZZY CMEANS

Dasar Perhitungan di link sbb
FCMEANS FORMULA


Nomralisasi :

function getV1($v){
 $e=0;
if($v=="Buruh"){$e=0.7;}
else  if($v=="Wirausaha"){$e=0.3;}
else  if($v=="Wiraswasta"){$e=0.2;}
else  if($v=="Pemulung"){$e=0.6;}
else  if($v=="Tukang Batu"){$e=0.8;}
else  if($v=="Pegawai Tetap"){$e=0.1;}
else  if($v=="Tukang Ojek Pangkalan"){$e=0.4;}
else  if($v=="Supir"){$e=0.5;}
else  if($v=="Tidak Bekerja"){$e=0.9;}
 return $e;
}

function getV2($v){
 $e=0;
if($v>5000000){$e=0.1;}
else if($v>3000000){$e=0.3;}
else if($v>2000000){$e=0.5;}
else if($v>1000000){$e=0.7;}
else if($v>=0){$e=0.9;}
 return $e;
}
function getV3($v){
 $e=0;
if($v>5){$e=0.9;}
else if($v>4){$e=0.7;}
else if($v>3){$e=0.5;}
else if($v>2){$e=0.3;}
else if($v>=0){$e=0.1;}
 return $e;
}

function getV4($v){
 $e=0;
if($v=="Rumah Sendiri"){$e=0.3;}
else if($v=="Mengontrak"){$e=0.7;}
 return $e;
}

function getV5($v){
 $e=0;
if($v=="Ada"){$e=0.35;}
else if($v=="Tidak Ada"){$e=0.75;}
 return $e;
}

++++


<link rel="stylesheet" href="js/jquery-ui.css">
<link rel="stylesheet" href="resources/demos/style.css">
<script src="js/jquery-1.12.4.js"></script>
<script src="js/jquery-ui.js"></script>
<script>
  $( function() {
    $( "#accordion" ).accordion({
      collapsible: true
    });
  } );
  </script>


<?php
$id_penilaian=$_GET["id"];
$sql="select * from `$tbpenilaian` where `id_penilaian`='$id_penilaian'";
$d=getField($conn,$sql);
$id_penilaian=$d["id_penilaian"];
$tgl_penilaian=WKT($d["tgl_penilaian"]);
$nama_penilaian=$d["nama_penilaian"];
$deskripsi=$d["deskripsi"];
$status=$d["status"];
$keterangan=$d["keterangan"];

?>
<div id="accordion">
  <h3>Info Data Penilaian</h3>
  <div>

<table width="519">


<tr>
<th width="117"><label for="id_penilaian">ID PENILAIAN</label>
<th width="12">:
<th width="240" colspan="2"><b><?php echo $id_penilaian;?></b>
</tr>


<tr>
<td height="32"><label for="nama_penilaian">Nama Penilaian</label>
<td>:
<td colspan="2"><?php echo $nama_penilaian;?></td>
</tr>

<tr>
<td height="35"><label for="tgl_penilaian">Tanggal Penilaian</label>
<td>:
<td colspan="2"><?php echo $tgl_penilaian;?></td>
</tr>
<tr>
<td height="30"><label for="deskripsi">Deskripsi</label>
<td>:<td colspan="2"><?php echo $deskripsi ." Cat: $keterangan";?>
</td>
</tr>

<tr>
<td height="32"><label for="status">status</label>
<td>:<td colspan="2"><?php echo $status;?></td></tr>


</table>


</div>
<h3> Info Data Pegawai Pilihan Penilaian</h3>
  <div>

Info Data Pegawai Pilihan Penilaian:
| <a href="penilaian_detail/pdf.php"><img src='ypathicon/pdf.png' alt='PDF'></a>
| <img src='ypathicon/print.png' alt='PRINT' OnClick="PRINT()"> |
<br>

<table class="table table-bordered table-striped table-condensed cf">
  <thead>
  <tr>
    <th width="3%"><center>No</th>
    <th width="25%"><center>Pemohon</th>
    <th width="15%"><center>Pekerjaan</th>
    <th width="10%"><center>Gaji</th>
    <th width="5%"><center>Tanggungan</th>
    <th width="15%"><center>Rumah</th>
    <th width="25%"><center>Harta</th>
    <th width="10%"><center>Menu</th>
  </tr>
  </thead>
  <tbody>
<?php 
  $sql="select * from `$tbpenilaiandetail` where id_penilaian='$id_penilaian' order by `id` desc";
  $jum=getJum($conn,$sql);
if($jum > 0){
$no=1;
$arr=getData($conn,$sql);
foreach($arr as $d) {
$id=$d["id"];
$id_penilaian=$d["id_penilaian"];
$idp=$d["id_pemohon"];
$nm_pemohon=getPemohon($conn,$idp);
$c1=$d["c1"];
$c2=$d["c2"];
$c3=$d["c3"];
$c4=$d["c4"];
$c5=$d["c5"];
$statusdetail=$d["status_detail"];
$keterangan=$d["keterangan"];

$i=$no-1;
$arIP[$i]=$idp;
$arnama[$i]=$nm_pemohon;
$arsv1[$i]=$c1;
$arsv2[$i]=$c2;
$arsv3[$i]=$c3;
$arsv4[$i]=$c4;
$arsv5[$i]=$c5;

$arv1[$i]=getV1($c1);
$arv2[$i]=getV2($c2);
$arv3[$i]=getV3($c3);
$arv4[$i]=getV4($c4);
$arv5[$i]=getV5($c5);

$color="#dddddd";
if($no %2==0){$color="#eeeeee";}
echo"<tr bgcolor='$color'>
<td>$no</td>
<td>$nm_pemohon</td>
<td align='left'>$c1</td>
<td align='left'>".RP($c2)."</td>
<td align='left'>$c3</td>
<td align='left'>$c4</td>
<td  align='left'>$c5</td>
<td align='center'>
<a href='?mnu=fcmeans&kd=$id_penilaian&pro=hapus&id=$id'><img src='ypathicon/h.png' alt='hapus'
onClick='return confirm(\"Apakah Anda benar-benar akan menghapus $id_pemohon pada data penilaian_detail ?..\")'></a></td>
</tr>";

$no++;
}//while
}//if
else{echo"<tr><td colspan='10'><blink>Maaf, Data penilaian_detail belum tersedia...</blink></td></tr>";}
?>
</tbody>
</table>

</div>

<?php
$jd=$i+1;
$gab="<h3> Normalisasi Data Pegawai Pilihan Penilaian</h3>
  <div>
Normalisasi Data Pegawai Pilihan Penilaian:

<table class='table table-bordered table-striped table-condensed cf'>
  <thead>
  <tr>
    <th width='3%'><center>No</th>
    <th width='25%'><center>Pemohon</th>
    <th width='15%'><center>Pekerjaan</th>
    <th width='10%'><center>Gaji</th>
    <th width='5%'><center>Tanggungan</th>
    <th width='15%'><center>Rumah</th>
    <th width='25%'><center>Harta</th>
  </tr>
  </thead>
  <tbody>";

for($i=0;$i<$jd;$i++){
$no=$i+1;
$gab.="<tr><td>$no<td>$arnama[$i]<td>$arv1[$i]<td>$arv2[$i]<td>$arv3[$i]<td>$arv4[$i]<td>$arv5[$i]</tr>";
}
$gab.="</table>";

$gab.="</div>";
echo $gab;

$JC=3;
$gab1="<h3>1. Bangkitkan matriks partisi inisial (µ: n x c)</h3><div>";
$gab1.="<table border='1'><tr><td><td>c1<td>c2<td>c3<td>SUM</tr>";
for($i=0;$i<$jd;$i++){
$no=$i+1;
$AR1[$i]=rand(0,1000)/1000;
$AR2[$i]=rand(0,1000)/1000;
$AR3[$i]=rand(0,1000)/1000;
$AR[$i]=$AR1[$i]+$AR2[$i]+$AR3[$i];
$gab1.="<tr><td>$no<td>$AR1[$i]<td>$AR2[$i]<td>$AR3[$i]<td>$AR[$i]</tr>";
}
$gab1.="</table></div>";
echo $gab1;



$lop=0;
$E=0.01;
$maxIter=10;
$ARP[0]=0;
$ep=0;

while($lop<$maxIter ){//&& $ep>$E
$lop++;

$gab2="<h3>2. Normalisasi matriks partisi dengan membagi tiap elemen dengan total barisnya</h3>";
$gab2.="<div><table border='1'><tr><td>No<td>c1<td>c2<td>c3<td>SUM</tr>";
for($i=0;$i<$jd;$i++){
$no=$i+1;
$AS1[$i]=$AR1[$i]/$AR[$i];
$AS2[$i]=$AR2[$i]/$AR[$i];
$AS3[$i]=$AR3[$i]/$AR[$i];
$AS[$i]=$AS1[$i]+$AS2[$i]+$AS3[$i];
$gab2.="<tr><td>$no<td>$AS1[$i]<td>$AS2[$i]<td>$AS3[$i]<td>$AS[$i]</tr>";
}
$gab2.="</table></div>";

echo $gab2;
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++


$gab3="<h3>Loop $lop #3. Hitung pusat cluster V (c x m)</h3>";
$gab3.="<div><table border=''1><tr>
<td>No
<td>x1
<td>x2
<td>x3
<td>x4
<td>x5
<td>c1
<td>c2
<td>c3
<td>c1²
<td>c2²
<td>c3²

<td>x1.c1²
<td>x1.c2²
<td>x1.c3²

<td>x2.c1²
<td>x2.c2²
<td>x2.c3²

<td>x3.c1²
<td>x3.c2²
<td>x3.c3²

<td>x4.c1²
<td>x4.c2²
<td>x4.c3²

<td>x5.c1²
<td>x5.c2²
<td>x5.c3²
</tr>";

for($i=0;$i<$jd;$i++){
$no=$i+1;
$ASS1[$i]=$AS1[$i]*$AS1[$i];
$ASS2[$i]=$AS2[$i]*$AS2[$i];
$ASS3[$i]=$AS3[$i]*$AS3[$i];
$arv11[$i]=$arv1[$i]*$ASS1[$i];
$arv12[$i]=$arv1[$i]*$ASS2[$i];
$arv13[$i]=$arv1[$i]*$ASS3[$i];

$arv21[$i]=$arv2[$i]*$ASS1[$i];
$arv22[$i]=$arv2[$i]*$ASS2[$i];
$arv23[$i]=$arv2[$i]*$ASS3[$i];

$arv31[$i]=$arv3[$i]*$ASS1[$i];
$arv32[$i]=$arv3[$i]*$ASS2[$i];
$arv33[$i]=$arv3[$i]*$ASS3[$i];

$arv41[$i]=$arv4[$i]*$ASS1[$i];
$arv42[$i]=$arv4[$i]*$ASS2[$i];
$arv43[$i]=$arv4[$i]*$ASS3[$i];

$arv51[$i]=$arv5[$i]*$ASS1[$i];
$arv52[$i]=$arv5[$i]*$ASS2[$i];
$arv53[$i]=$arv5[$i]*$ASS3[$i];

$gab3.="<tr>
<td>$no
<td>$arv1[$i]
<td>$arv2[$i]
<td>$arv3[$i]
<td>$arv4[$i]
<td>$arv5[$i]

<td>$AS1[$i]
<td>$AS2[$i]
<td>$AS3[$i]

<td>$ASS1[$i]
<td>$ASS2[$i]
<td>$ASS3[$i]

<td>$arv11[$i]
<td>$arv12[$i]
<td>$arv13[$i]

<td>$arv21[$i]
<td>$arv22[$i]
<td>$arv23[$i]

<td>$arv31[$i]
<td>$arv32[$i]
<td>$arv33[$i]

<td>$arv41[$i]
<td>$arv42[$i]
<td>$arv43[$i]

<td>$arv51[$i]
<td>$arv52[$i]
<td>$arv53[$i]
</tr>";
}
$totv1=array_sum($arv1);
$totv2=array_sum($arv2);
$totv3=array_sum($arv3);
$totv4=array_sum($arv4);
$totv5=array_sum($arv5);

$totc1=array_sum($AS1);
$totc2=array_sum($AS2);
$totc3=array_sum($AS3);

$totc12=array_sum($ASS1);
$totc22=array_sum($ASS2);
$totc32=array_sum($ASS3);

$totv11=array_sum($arv11);
$totv12=array_sum($arv12);
$totv13=array_sum($arv13);

$totv21=array_sum($arv21);
$totv22=array_sum($arv22);
$totv23=array_sum($arv23);

$totv31=array_sum($arv31);
$totv32=array_sum($arv32);
$totv33=array_sum($arv33);

$totv41=array_sum($arv41);
$totv42=array_sum($arv42);
$totv43=array_sum($arv43);

$totv51=array_sum($arv51);
$totv52=array_sum($arv52);
$totv53=array_sum($arv53);


$gab3.="<tr>
<td>Total
<td>$totv1
<td>$totv2
<td>$totv3
<td>$totv4
<td>$totv5

<td>$totc1
<td>$totc2
<td>$totc3

<td>$totc12
<td>$totc22
<td>$totc32

<td>$totv11
<td>$totv12
<td>$totv13

<td>$totv21
<td>$totv22
<td>$totv23

<td>$totv31
<td>$totv32
<td>$totv33

<td>$totv41
<td>$totv42
<td>$totv43

<td>$totv51
<td>$totv52
<td>$totv53
</tr>";

$gab3.="</table></div>";


echo $gab3;


$X11=$totv11/$totc12;
$X12=$totv21/$totc12;
$X13=$totv31/$totc12;
$X14=$totv41/$totc12;
$X15=$totv51/$totc12;

$X21=$totv12/$totc22;
$X22=$totv22/$totc22;
$X23=$totv32/$totc22;
$X24=$totv42/$totc22;
$X25=$totv52/$totc22;

$X31=$totv13/$totc32;
$X32=$totv23/$totc32;
$X33=$totv33/$totc32;
$X34=$totv43/$totc32;
$X35=$totv53/$totc32;

$gab5="<h3>Loop $lop #4. Hitung fungsi obyektif (P)</h3>";
$gab5.="<div><table border='1'>";
$gab5.="<tr><td>No<td>x1<td>x2<td>x3<td>x4<td>x5
<td>dx11<td>dx12<td>dx13<td>dx14<td>dx15
<td>dx21<td>dx22<td>dx23<td>dx24<td>dx25
<td>dx31<td>dx32<td>dx33<td>dx34<td>dx35

<td>dy11<td>dy12<td>dy13<td>dy14<td>dy15
<td>dy21<td>dy22<td>dy23<td>dy24<td>dy25
<td>dy31<td>dy32<td>dy33<td>dy34<td>dy35

";
for($i=0;$i<$jd;$i++){
$no=$i+1;
$arx11[$i]=pow($arv1[$i]-$X11,2);$ary11[$i]=$arx11[$i]*$AR1[$i];
$arx12[$i]=pow($arv2[$i]-$X12,2);$ary12[$i]=$arx12[$i]*$AR1[$i];
$arx13[$i]=pow($arv3[$i]-$X13,2);$ary13[$i]=$arx13[$i]*$AR1[$i];
$arx14[$i]=pow($arv4[$i]-$X14,2);$ary14[$i]=$arx14[$i]*$AR1[$i];
$arx15[$i]=pow($arv5[$i]-$X15,2);$ary15[$i]=$arx15[$i]*$AR1[$i];

$arx21[$i]=pow($arv1[$i]-$X21,2);$ary21[$i]=$arx21[$i]*$AR2[$i];
$arx22[$i]=pow($arv2[$i]-$X22,2);$ary22[$i]=$arx22[$i]*$AR2[$i];
$arx23[$i]=pow($arv3[$i]-$X23,2);$ary23[$i]=$arx23[$i]*$AR2[$i];
$arx24[$i]=pow($arv4[$i]-$X24,2);$ary24[$i]=$arx24[$i]*$AR2[$i];
$arx25[$i]=pow($arv5[$i]-$X25,2);$ary25[$i]=$arx25[$i]*$AR2[$i];

$arx31[$i]=pow($arv1[$i]-$X31,2);$ary31[$i]=$arx31[$i]*$AR3[$i];
$arx32[$i]=pow($arv2[$i]-$X32,2);$ary32[$i]=$arx32[$i]*$AR3[$i];
$arx33[$i]=pow($arv3[$i]-$X33,2);$ary33[$i]=$arx33[$i]*$AR3[$i];
$arx34[$i]=pow($arv4[$i]-$X34,2);$ary34[$i]=$arx34[$i]*$AR3[$i];
$arx35[$i]=pow($arv5[$i]-$X35,2);$ary35[$i]=$arx35[$i]*$AR3[$i];

$T1[$i]=$arx11[$i]+$arx12[$i]+$arx13[$i]+$arx14[$i]+$arx15[$i];
$T2[$i]=$arx21[$i]+$arx22[$i]+$arx23[$i]+$arx24[$i]+$arx25[$i];
$T3[$i]=$arx31[$i]+$arx32[$i]+$arx33[$i]+$arx34[$i]+$arx35[$i];

$U1[$i]=pow($T1[$i],-1);
$U2[$i]=pow($T2[$i],-1);
$U3[$i]=pow($T3[$i],-1);
$T[$i]=$U1[$i]+$U2[$i]+$U3[$i];

$C1[$i]=$T1[$i]/$T[$i];
$C2[$i]=$T2[$i]/$T[$i];
$C3[$i]=$T3[$i]/$T[$i];

$H[$i]=1;
$K[$i]="KelompokA";
$B[$i]=0;
if($C1[$i]>=$C2[$i] && $C1[$i]>=$C3[$i] ){$H[$i]=1;$K[$i]="KelompokA";$B[$i]=$C1[$i];}
elseif($C2[$i]>=$C1[$i] && $C2[$i]>=$C3[$i] ){$H[$i]=2;$K[$i]="KelompokB";$B[$i]=$C2[$i];}
elseif($C3[$i]>=$C2[$i] && $C3[$i]>=$C1[$i] ){$H[$i]=3;$K[$i]="KelompokC";$B[$i]=$C3[$i];}


$gab5.="<tr>
<td>$no
<td>$arv1[$i]
<td>$arv2[$i]
<td>$arv3[$i]
<td>$arv4[$i]
<td>$arv5[$i]

<td>$arx11[$i]
<td>$arx12[$i]
<td>$arx13[$i]
<td>$arx14[$i]
<td>$arx15[$i]

<td>$arx21[$i]
<td>$arx22[$i]
<td>$arx23[$i]
<td>$arx24[$i]
<td>$arx25[$i]

<td>$arx31[$i]
<td>$arx32[$i]
<td>$arx33[$i]
<td>$arx34[$i]
<td>$arx35[$i]

<td>$arx41[$i]
<td>$arx42[$i]
<td>$arx43[$i]
<td>$arx44[$i]
<td>$arx45[$i]

<td>$arx51[$i]</td>
<td>$arx52[$i]</td>
<td>$arx53[$i]</td>
<td>$arx54[$i]</td>
<td>$arx55[$i]</td>

<td>$ary11[$i]</td>
<td>$ary12[$i]</td>
<td>$ary13[$i]</td>
<td>$ary14[$i]</td>
<td>$ary15[$i]</td>

<td>$ary21[$i]
<td>$ary22[$i]
<td>$ary23[$i]
<td>$ary24[$i]
<td>$ary25[$i]

<td>$ary31[$i]
<td>$ary32[$i]
<td>$ary33[$i]
<td>$ary34[$i]
<td>$ary35[$i]

<td>$ary41[$i]
<td>$ary42[$i]
<td>$ary43[$i]
<td>$ary44[$i]
<td>$ary45[$i]

<td>$ary51[$i]
<td>$ary52[$i]
<td>$ary53[$i]
<td>$ary54[$i]
<td>$ary55[$i]

";
}

$totalP1=array_sum($ary11)+array_sum($ary12)+array_sum($ary13)+array_sum($ary14)+array_sum($ary15);
$totalP2=array_sum($ary21)+array_sum($ary22)+array_sum($ary23)+array_sum($ary24)+array_sum($ary25);
$totalP3=array_sum($ary31)+array_sum($ary32)+array_sum($ary33)+array_sum($ary34)+array_sum($ary35);
$totalP=$totalP1+$totalP2+$totalP3;

if($lop>1){
$n=$lop-1;
$ARP[$n]=$totalP;
$ep=abs($totalP-$ARP[$n-1]);
}

$gab5.="</table><h4>Total P: $totalP</h4>";
$gab5.="</div>";


$gab4="<h3>Loop $lop #4. Bangkitkan matriks V</h3>";
$gab4.="<div><table border='1'>";
$gab4.="<tr><td>#<td>x1<td>x2<td>x3<td>x4<td>x5</tr>";
$gab4.="<tr><td>c1<td>$X11<td>$X12<td>$X13<td>$X14<td>$X15</tr>";
$gab4.="<tr><td>c2<td>$X21<td>$X22<td>$X23<td>$X24<td>$X25</tr>";
$gab4.="<tr><td>c3<td>$X31<td>$X32<td>$X33<td>$X34<td>$X35</tr>";
$gab4.="</table>";
$gab4.="</div>";


echo $gab4;
echo $gab5;

$gab6="<h3>Loop $lop #5. Pembentukan matriks partisi (µ)</h3>";
$gab6.="<div><table border='1'>";
$gab6.="<tr><td>No<td>c1<td>c2<td>c3<td>c1^-1<td>c2^-1<td>c3^-1<td>sum</td></tr>";
for($i=0;$i<$jd;$i++){
$no=$i+1;
$gab6.="<tr><td>$no
<td>$T1[$i]<td>$T2[$i]<td>$T3[$i]
<td>$U1[$i]<td>$U2[$i]<td>$U3[$i]
<td>$T[$i]</td></tr>";
}
$gab6.="</table>";
$gab6.="</div>";

echo $gab6;

if($lop==$maxIter){
$sql="delete from `$tbhasil` where `id_penilaian`='$id_penilaian'";
$hapus=process($conn,$sql);
}

$gab7="<h3>Loop $lop #6. Update matriks partisi (µ)</h3>";
$gab7.="<div><table border='1'>";
$gab7.="<tr><td>No<td>c1<td>c2<td>c3<td>Cluster<td>Result</td></tr>";
for($i=0;$i<$jd;$i++){

//update nilai random awal AR..LOOP if |Pi-Pi-1|<e atau i>MaxIter then berhenti
$AR1[$i]=$C1[$i];
$AR2[$i]=$C2[$i];
$AR3[$i]=$C3[$i];


if($lop==$maxIter){
$sql=" INSERT INTO `$tbhasil` (
`id_hasil` ,
`id_penilaian`,
`id_pemohon`,
`bobot`,
`hasil`,
`keterangan` ,
`status`
) VALUES (
'',
'$id_penilaian',
'$arIP[$i]',
'$B[$i]',
'$H[$i]',
'$C1[$i] : $C2[$i] : $C3[$i] ',
'Proses'
)";
$simpan=process($conn,$sql);
}

$no=$i+1;
$gab7.="<tr><td>$no
<td>$C1[$i]
<td>$C2[$i]
<td>$C3[$i]
<td>$H[$i]
<td>$K[$i]
</td></tr>";
}
$gab7.="</table>";
$gab7.="</div>";

echo $gab7;
//==================================================================


}//while
?>















</div>

PHP DOM

VISIBLE ID

<script language="JavaScript">
function cekStatus(status) {//Rawat Jalan
//alert(status);
if(status=="Rujuk"){
document.getElementById("dokter_rujuk").disabled = true;
document.getElementById("rs_rujuk").disabled = true;
//document.getElementById("dokter_rujuk").style.visibility = "hidden";
//document.getElementById("rs_rujuk").style.visibility = "hidden";
}
else{
document.getElementById("dokter_rujuk").disabled = false;
document.getElementById("rs_rujuk").disabled = false;
//document.getElementById("dokter_rujuk").style.visibility = "visible";
//document.getElementById("rs_rujuk").style.visibility = "visible";
}
}


<tr>
<td height="53"><label for="status">Status</label>
<td>:<td colspan="2">
<input type="radio" name="status" id="status" onChange="cekStatus(this.value)"  checked="checked" value="Selesai" <?php if($status=="Selesai"){echo"checked";}?>/>Selesai
<input type="radio" name="status" id="status"  onChange="cekStatus(this.value)"  value="Rujuk" <?php if($status=="Rujuk"){echo"checked";}?>/>Rujuk
<input type="radio" name="status" id="status"  onChange= "cekStatus(this.value)" value="Rawat Jalan" <?php if($status=="Rawat Jalan"){echo"checked";}?>/>Rawat Jalan
</td></tr>

INHERIT

<!DOCTYPE html>

<html>

<body>

<p id="myP1">This is some text.</p>

<p id="myP2">This is some text.</p>

<input type="button" onclick="demoDisplay()" value="Hide text with display property">

<input type="button" onclick="demoVisibility()" value="Hide text with visibility property">

<script>

function demoDisplay() {

  document.getElementById("myP1").style.display = "none";

}

function demoVisibility() {

  document.getElementById("myP2").style.visibility = "hidden";

}

</script>

</body>

</html>

Mencari String

<?php

$kalimat = 'ibu memasak didapur';

if(preg_match("/masak/i", $kalimat)) {

  echo 'Ketemu';

} else {

  echo 'Tidak Ketemu';

}

?>

NAIVE BAYES

HASIL:

<?php

if(isset($_POST["Analisa"])){

$sql="select * from `$tbkerusakan` order by `id_kerusakan` asc";
  $arr=getData($conn,$sql);
$i=0;
foreach($arr as $d) {
$ik[$i]=$d["id_kerusakan"];
$nk[$i]=$d["nama_kerusakan"];
$pk[$i]=$d["penyebab"];
$sk[$i]=$d["solusi"];
$kk[$i]=$d["keterangan"];
$gk[$i]=$d["gambar"];
$i++;
}
$id_user=strip_tags($_POST["id_user"]);
$tanggal=BAL(strip_tags($_POST["tanggal"]));

$pilih1=strip_tags($_POST["pilih1"]);
$pilih2=strip_tags($_POST["pilih2"]);
$pilih3=strip_tags($_POST["pilih3"]);
$pilih4=strip_tags($_POST["pilih4"]);
$pilih5=strip_tags($_POST["pilih5"]);
$pilih6=strip_tags($_POST["pilih6"]);
$pilih7=strip_tags($_POST["pilih7"]);
$pilih8=strip_tags($_POST["pilih8"]);
$pilih9=strip_tags($_POST["pilih9"]);
$pilih10=strip_tags($_POST["pilih10"]);
$keterangan=strip_tags($_POST["keterangan"]);

$jumK1=getOut($conn,$ik[0]);
$jumK2=getOut($conn,$ik[1]);
$jumK3=getOut($conn,$ik[2]);
$totK=$jumK1+$jumK2+$jumK3;

$jumG1A=getKK($conn,'gejala1',$pilih1,$ik[0]);
$jumG1B=getKK($conn,'gejala1',$pilih1,$ik[1]);
$jumG1C=getKK($conn,'gejala1',$pilih1,$ik[2]);

$jumG2A=getKK($conn,'gejala2',$pilih2,$ik[0]);
$jumG2B=getKK($conn,'gejala2',$pilih2,$ik[1]);
$jumG2C=getKK($conn,'gejala2',$pilih2,$ik[2]);

$jumG3A=getKK($conn,'gejala3',$pilih3,$ik[0]);
$jumG3B=getKK($conn,'gejala3',$pilih3,$ik[1]);
$jumG3C=getKK($conn,'gejala3',$pilih3,$ik[2]);

$jumG4A=getKK($conn,'gejala4',$pilih4,$ik[0]);
$jumG4B=getKK($conn,'gejala4',$pilih4,$ik[1]);
$jumG4C=getKK($conn,'gejala4',$pilih4,$ik[2]);

$jumG5A=getKK($conn,'gejala5',$pilih5,$ik[0]);
$jumG5B=getKK($conn,'gejala5',$pilih5,$ik[1]);
$jumG5C=getKK($conn,'gejala5',$pilih5,$ik[2]);

$jumG6A=getKK($conn,'gejala6',$pilih6,$ik[0]);
$jumG6B=getKK($conn,'gejala6',$pilih6,$ik[1]);
$jumG6C=getKK($conn,'gejala6',$pilih6,$ik[2]);

$jumG7A=getKK($conn,'gejala7',$pilih7,$ik[0]);
$jumG7B=getKK($conn,'gejala7',$pilih7,$ik[1]);
$jumG7C=getKK($conn,'gejala7',$pilih7,$ik[2]);

$jumG8A=getKK($conn,'gejala8',$pilih8,$ik[0]);
$jumG8B=getKK($conn,'gejala8',$pilih8,$ik[1]);
$jumG8C=getKK($conn,'gejala8',$pilih8,$ik[2]);

$jumG9A=getKK($conn,'gejala9',$pilih9,$ik[0]);
$jumG9B=getKK($conn,'gejala9',$pilih9,$ik[1]);
$jumG9C=getKK($conn,'gejala9',$pilih9,$ik[2]);

$jumG10A=getKK($conn,'gejala10',$pilih10,$ik[0]);
$jumG10B=getKK($conn,'gejala10',$pilih10,$ik[1]);
$jumG10C=getKK($conn,'gejala10',$pilih10,$ik[2]);



if($jumG1A==0 || $jumG2A==0 || $jumG3A==0 || $jumG4A==0 || $jumG5A==0 || $jumG6A==0 || $jumG7A==0 || $jumG8A==0 || $jumG9A==0 || $jumG10A==0 ){
$jumK1+=1;
$totK+=1;
$jumG1A+=1;$jumG2A+=1;$jumG3A+=1;$jumG4A+=1;$jumG5A+=1;$jumG6A+=1;$jumG7A+=1;$jumG8A+=1;$jumG9A+=1;$jumG10A+=1;
}
if($jumG1B==0 || $jumG2B==0 || $jumG3B==0 || $jumG4B==0 || $jumG5B==0 || $jumG6B==0 || $jumG7B==0 || $jumG8B==0 || $jumG9B==0 || $jumG10B==0 ){
$jumK1+=1;
$totK+=1;
$jumG1B+=1;$jumG2B+=1;$jumG3B+=1;$jumG4B+=1;$jumG5B+=1;$jumG6B+=1;$jumG7B+=1;$jumG8B+=1;$jumG9B+=1;$jumG10B+=1;
}
if($jumG1C==0 || $jumG2C==0 || $jumG3C==0 || $jumG4C==0 || $jumG5C==0 || $jumG6C==0|| $jumG7C==0|| $jumG8C==0|| $jumG9C==0|| $jumG10C==0 ){
$jumK1+=1;
$totK+=1;
$jumG1C+=1;$jumG2C+=1;$jumG3C+=1;$jumG4C+=1;$jumG5C+=1;$jumG6C+=1;$jumG7C+=1;$jumG8C+=1;$jumG9C+=1;$jumG10C+=1;
}


$HA=($jumK1/$totK)*($jumG1A/$jumK1)*($jumG2A/$jumK1)*($jumG3A/$jumK1)*($jumG4A/$jumK1)*($jumG5A/$jumK1)*($jumG6A/$jumK1)*($jumG7A/$jumK1)*($jumG8A/$jumK1)*($jumG9A/$jumK1)*($jumG10A/$jumK1);
$HB=($jumK2/$totK)*($jumG1B/$jumK2)*($jumG2B/$jumK2)*($jumG3B/$jumK2)*($jumG4B/$jumK2)*($jumG5B/$jumK2)*($jumG6B/$jumK2)*($jumG7B/$jumK2)*($jumG8B/$jumK2)*($jumG9B/$jumK2)*($jumG10B/$jumK2);
$HC=($jumK3/$totK)*($jumG1C/$jumK3)*($jumG2C/$jumK3)*($jumG3C/$jumK3)*($jumG4C/$jumK3)*($jumG5C/$jumK3)*($jumG6C/$jumK3)*($jumG7C/$jumK3)*($jumG8C/$jumK3)*($jumG9C/$jumK3)*($jumG10C/$jumK3);

$SHA="($jumK1/$totK) x ($jumG1A/$jumK1) x ($jumG2A/$jumK1) x ($jumG3A/$jumK1) x ($jumG4A/$jumK1) x ($jumG5A/$jumK1) x ($jumG6A/$jumK1) x ($jumG7A/$jumK1) x ($jumG8A/$jumK1) x ($jumG9A/$jumK1) x ($jumG10A/$jumK1)";
$SHB="($jumK2/$totK) x ($jumG1B/$jumK2) x ($jumG2B/$jumK2) x ($jumG3B/$jumK2) x ($jumG4B/$jumK2) x ($jumG5B/$jumK2) x ($jumG6B/$jumK2) x ($jumG7B/$jumK2) x ($jumG8B/$jumK2) x ($jumG9B/$jumK2) x ($jumG10B/$jumK2)";
$SHC="($jumK3/$totK) x ($jumG1C/$jumK3) x ($jumG2C/$jumK3) x ($jumG3C/$jumK3) x ($jumG4C/$jumK3) x ($jumG5C/$jumK3) x ($jumG6C/$jumK3) x ($jumG7C/$jumK3) x ($jumG8C/$jumK3) x ($jumG9C/$jumK3) x ($jumG10C/$jumK3)";




$max=0;
$keterangan="";
$index=0;
if($HA>=$HB && $HA>=$HC){
$max=$HA;
$index=0;
}
else if($HB>=$HA && $HB>=$HB){
$max=$HB;
$index=1;
}
else if($HC>=$HA && $HC>=$HC){
$max=$HC;
$index=2;
}
$iout=$ik[$index];
$nout=$nk[$index];
$pout=$pk[$index];
$sout=$sk[$index];
$gout=$gk[$index];
$kout=$kk[$index];

$sql="select * from `$tbuser` where `id_user`='$id_user'";
$d=getField($conn,$sql);
$nama_user=$d["nama_user"];
$email=$d["email"];
$teleopn=$d["telepon"];


$gab="<h3>Hasil Analisa</h3>";
$gab.= "<strong>$nk[0] => $SHA =$HA</strong><br>";
$gab.= "<strong>$nk[1] => $SHB =$HB</strong><br>";
$gab.= "<strong>$nk[2] => $SHC =$HC</strong><hr>";

$gab2= "<b>Yth $nama_user ($id_user) <br>Mobil Anda Terdiagnosa : $nout ($max)<br>";
$gab2.= "<i>Penyebab: $pout</i><hr>";
$gab2.= "<i>Solusi: $sout</i><hr>";

$rekapitulasi= "$nk[0] => $SHA =$HA<br>";
$rekapitulasi.= "$nk[1] => $SHB =$HB<br>";
$rekapitulasi.= "$nk[2] => $SHC =$HC<hr>";


echo $gab;
echo $gab2;
echo "<img src='ypathfile/$gout' title='$nout' width='500' height='400'><br>";
$_SESSION["gab"]=$gab;
$_SESSION["gab2"]=$gab2;
echo"<img src='ypathicon/print.png' title='PRINT' OnClick='PRINTME()'>";

$tanggal=date("Y-m-d");
$jam=date("H:i:s");
$sql=" INSERT INTO `$tbpengujian` (
`id_pengujian` ,
`id_user` ,
`tanggal` ,
`pilih1` ,
`pilih2` ,
`pilih3`,
`pilih4` ,
`pilih5` ,
`pilih6` ,
`pilih7` ,
`pilih8`,
`pilih9`,
`pilih10`,
`id_kerusakan`,
`rekapitulasi`,
`keterangan`
) VALUES (
'',
'$id_user',
'$tanggal',
'$pilih1',
'$pilih2',
'$pilih3',
'$pilih4',
'$pilih5',
'$pilih6',
'$pilih7',
'$pilih8',
'$pilih9',
'$pilih10',
'$iout',
'$rekapitulasi',
'$gab $gab2'
)";

$simpan=process($conn,$sql);
}

?>
<?php

function getKK($conn,$kolom,$data,$kat){
  $sql="select `id_kerusakan` from `tb_datalatih` where `$kolom`='$data' and `id_kerusakan`='$kat'";
  $jum=getJum($conn,$sql);
  return $jum;
}

function getOut($conn,$kat){
  $sql="select `id_kerusakan` from `tb_datalatih` where `id_kerusakan`='$kat'";
  $jum=getJum($conn,$sql);
  return $jum;
}


?>

PHP MLearning TF IDF Deteksi Bahasa

dataset.csv

sentence	language
Hello, do you know what time the movie is tonight?	english
I am calling to make reservations	english
I would like to know if it is at all possible to check in	english
What time does the swimming pool open?	english
Where is the games room?	english
We must call the police.	english
How many pupils are there in your school?	english
Twenty litres of unleaded, please.	english
Is it near here?	english
Do I have to change?	english
Which counter do I go to to change money?	english
I would like two postcards, please.	english
There was a big explosion.	english
Where is the television room?	english
Where's the nearest railway station?	english
The storms caused flooding.	english
Where is the duty free shop?	english
I witnessed it happening.	english
I would like two postcards, please.	english
How about going to the cinema?	english
Où est la boulangerie?	french
Je voudrais une boîte de chocolats.	french
Y a-t-il un autre hôtel près d'ici?	french
Vérifiez la batterie, s'il vous plaît.	french
La banque ouvre à quelle heure?	french
Est-ce que je peux l'écouter?	french
Vous devez faire une déclaration de perte.	french
Combien d'élèves y a-t-il dans votre collège?	french
Est-ce qu-il y a un car qui va à l'aéroport?	french
Nous voudrions rester jusqu'à dimanche prochain.	french
Je ne comprends pas.	french
Voici une ordonnance pour des comprimés.	french
Je n'ai qu'un billet de cinquante francs.	french
À quelle heure commence la dernière séance?	french
Faut-il changer?	french
Il n'avait pas la priorité.	french
Puis-je prendre les places à l'avance?	french
Elle a trente et un ans.	french
Pour aller à la pharmacie, s'il vous plaît?	french
Voulez-vous me peser ce colis, s'il vous plaît.	french
Ciao, ti va di andare al cinema?	italian
Mi sai dire quando aprono il negozio?	italian
Quando c'è l'ultimo autobus?	italian
Lo posso provare addosso?	italian
C'è una presa elettrica per il nostro caravan?	italian
Vorrei una scatola di cioccolatini.	italian
Non e' stata colpa mia.	italian
Sono molto scarso in fisica.	italian
Vorrei del vino bianco.	italian
Me lo puo' spiegare, per piacere.	italian
Vorrei chiamare a spese del ricevente.	italian
Ho perso il mio passaporto.	italian
Posso avere i biglietti del cinema per favore?	italian
Vorrei un pacchetto di biscotti.	italian
Quali materie studi (studia)?	italian
Quanto frequenti sono gli autobus?	italian
A che ora sara' la prossima raccolta?	italian
Vorrei prenotare un posto.	italian
Per favore, quanto costa spedire una lettera in Germania?	italian
Mio padre e' un programmatore.	italian

code sbb:

<?php 

declare(strict_types=1);
namespace PhpmlExamples;

include 'vendor/autoload.php';

use Phpml\Dataset\CsvDataset;
use Phpml\Dataset\ArrayDataset;
use Phpml\FeatureExtraction\TokenCountVectorizer;
use Phpml\Tokenization\WordTokenizer;
use Phpml\CrossValidation\StratifiedRandomSplit;
use Phpml\FeatureExtraction\TfIdfTransformer;
use Phpml\Metric\Accuracy;
use Phpml\Classification\SVC;
use Phpml\SupportVectorMachine\Kernel;

$dataset = new CsvDataset('data/languages.csv', 1);
$vectorizer = new TokenCountVectorizer(new WordTokenizer());
$tfIdfTransformer = new TfIdfTransformer();
$samples = [];
foreach ($dataset->getSamples() as $sample) {
    $samples[] = $sample[0];
 //echo $sample[0]."<br>";
}
$vectorizer->fit($samples);//samples=array
cetak0($samples);

$vectorizer->transform($samples);
//cetak($samples);

$tfIdfTransformer->fit($samples);
$tfIdfTransformer->transform($samples);
//cetak($samples);

$dt=$dataset->getTargets();//english,italia,french
//cetak0($dt);

$dataset = new ArrayDataset($samples, $dt);//object
//vard($dataset);

$randomSplit = new StratifiedRandomSplit($dataset, 0.1);
//vard($randomSplit);

$classifier = new SVC(Kernel::RBF, 10000);

$AA=$randomSplit->getTrainSamples();
$BB=$randomSplit->getTrainLabels();

echo"<h1>Samples - Label</h1>";
//cetak($AA);
//echo"<hr>";
//cetak0($BB);

$CC=$randomSplit->getTestSamples();
//echo"<hr>";
//cetak($CC);

$DD=$randomSplit->getTestLabels();
echo"<hr>";
cetak0($DD);



$classifier->train($AA, $BB);
$predictedLabels = $classifier->predict($CC);
echo"<hr>";
cetak0($predictedLabels);

echo 'Accuracy: '.Accuracy::score($DD, $predictedLabels);



function tipe($x){
 echo gettype($x)."<hr>";
 return "";
}

function vard($x){
 echo  var_dump($x)."<hr>";
  return "";
}

function cetak($x){
 $p=count($x);
 for($i=0;$i<$p;$i++){
  $q=count($x[$i]);
  for($j=0;$j<$q;$j++){
   echo $x[$i][$j]."#";
  }
  echo"<br>";
 }
 return "";
}



function cetak0($x){
 $p=count($x);
 for($i=0;$i<$p;$i++){
   echo $x[$i]."#";
 }
 return "";
}
?>

Samples - Label
download code

english#english#french#french#italian#italian#

english#english#french#french#italian#italian#Accuracy: 1