Skip to content

Instantly share code, notes, and snippets.

@wouerner
Last active October 1, 2020 15:47
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save wouerner/2071d043e059d1a93ec4b5062281d4e3 to your computer and use it in GitHub Desktop.
Save wouerner/2071d043e059d1a93ec4b5062281d4e3 to your computer and use it in GitHub Desktop.
<?php
/*Primeiramente, as letras Googlon são classificadas em dois grupos: as letras s, j, n, c e q são
chamadas "letras tipo foo", enquanto que as demais são conhecidas como "letras tipo bar".
Os linguistas descobriram que as preposições em Googlon são as palavras de 4 letras que terminam
numa letra tipo foo, mas onde não ocorre a letra l. Portanto, é fácil ver que existem 21 preposições
no Texto A. E no Texto B, quantas preposições existem?*/
# 4 letras com tipo foo
include 'textoa.php';
//separando o texto por espaços
$texto_separado = explode(' ', $textoa);
$texto_separado = array_filter($texto_separado); # nova
foreach($texto_separado as $key => $texto){
$texto_separado[$key] = preg_replace('/[\x00-\x1F\x7F\xA0]/u', '', $texto);
}
/* var_dump($texto_separado); */
/* die; */
$array_foo = ["s", "j", "n", "c", "q"];
$result = 0;
$i = 1;
foreach($texto_separado as $texto){
if(strlen($texto) == 4) { #ok
$letra_final = substr($texto, -1);
/* echo $letra_final . " "; */
if(in_array($letra_final, $array_foo)){
$pos = strrpos($texto, "l");
/* echo ($i++) . " pos: $pos texto: $texto \n"; */
/* if($pos === false){ */
if($pos){
/* $result++; */
} else {
$result++;
}
}
}
}
#echo "Existem $result Preposições";
/*
Um outro fato interessante descoberto pelos linguistas é que, no Googlon, os verbos sempre são
palavras de 7 ou mais letras que terminam numa letra tipo bar. Além disso, se um verbo começa com
uma letra tipo foo, o verbo está em primeira pessoa.
Assim, lendo o Texto A, é possível identificar 160 verbos no texto, dos quais 37 estão em primeira pessoa.
Já no Texto B, quantos são os verbos?
E quantos verbos do Texto B estão em primeira pessoa?
*/
$ii = 1;
$cont_primeira_pessoa = 0;
$cont_verbos = 0;
$texto_separado2 = explode(' ', $textoa);
foreach($texto_separado2 as $key => $texto){
$texto_separado2[$key] = preg_replace('/[\x00-\x1F\x7F\xA0]/u', '', $texto);
}
$array_bar = ["k", "m", "g", "w", "z", "t", "x", "d", "r", "p", "f", "l", "b", "v", "h"];
foreach($texto_separado2 as $texto2){
echo ($i++) . " texto: $texto2 \n";
if(strlen($texto2) >= 7){
$ultima_letra = substr($texto2, -1);
if(in_array($ultima_letra, $array_bar)) {
$cont_verbos++;
$primeira_letra = substr($texto2, 0, 1);
if(in_array($primeira_letra, $array_foo)){
$cont_primeira_pessoa++;
}
}
}
}
//$teste = substr("guilhermecesar", -1);
echo "Verbos: $cont_verbos <br>";
echo "Verbos Primeira pessoa: $cont_primeira_pessoa";
?>
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment