Подмешать кеи в цепи маркова - Форум успешных вебмастеров

jskorvin · 03.06.2010, 17:21

Есть скрипт

PHP код:


			
<?

Class MarkovChains{

    var $prepared = array();

    function MarkovChains($source){

        $source = strtolower($source);

        $source = str_replace(array ("? ", "! "), ".", $source);

        $source = str_replace(array (" -", "- ", "\t", "\r", "\n", "|", "&", '\\', '/', " :", " ;", "©", "•"), ' ', $source);

        $source = str_replace(array (")", "(", "]", "[", "'", "\"", '*', '•', '~', '{', '}'), '', $source);

        $source = str_replace(" ,", ",", $source);

        $source = preg_replace("~(\s+\d{1,2}\s+)|(\w*\.\w+)~", " ", $source);

        $source = preg_replace("~\s+~", " ", $source);$sentens = explode('. ', $source);

        $count_sentens = count($sentens);

        for ($j=0; $j<$count_sentens; ++$j){

        $sentens[$j] = explode(' ', $sentens[$j]);

            $count_words = count($sentens[$j]) - 1;

            for ($i=0; $i < $count_words; ++$i){

                $prefix = $sentens[$j][$i];

                $this->prepared[$prefix][] = $sentens[$j][$i+1];

            }

        }

        $keys = array_keys($this->prepared);





        foreach ($keys as $key){

            $this->prepared[$key] = array_unique($this->prepared[$key]);

        }

    }

    function GenerateText($size){

        $result_count = 0;

        for ($j=0; $result_count < $size; ++$j){

            $prev = array_rand($this->prepared);

            $num = mt_rand(5, 12);

            for ($i=0; $i<$num; ++$i){

                $sents[$j][$i] = $prev;

                ++$result_count;

                $p = $this->prepared[$prev][mt_rand(0, count($this->prepared[$prev]) - 1)];

                if ($p == '') $p = array_rand($this->prepared);

                $prev = $p;

                if ($prev == '') break 2;

            }

        }

        foreach ($sents as $sent){

            $count_word=count($sent);

            if ($count_word<=2) continue;

            if (strlen($sent[$count_word-1]) < 4) unset($sent[$count_word-1]);

            $sent[$count_word-2] = rtrim($sent[$count_word-2], ",:;");

            $sent[$count_word-1] = rtrim($sent[$count_word-1], ",:;");

            $output .= ucfirst(implode(' ', $sent)).'. ';

        }

        $output = str_replace(' .', '.', $output);

        return $output;

    }

}





$source =  file_get_contents("text.txt");

$markov = new MarkovChains($source);

$result = $markov->GenerateText(100);



echo $result;

и я - долбоеб

Как подмешать сюда кеи?
Вроде все элементарно, но совершенно не понимаю как подмешать сюда кеи.

chesser · 03.06.2010, 17:34

в последнем цикле for в самый его конец воткнуть примерно следующее:
$sents[$j][] = "keyword";
тогда keyword будет вставлятся в конец предложения

jskorvin · 03.06.2010, 17:37

Цитата:

Сообщение от chesser

в последнем цикле for в самый его конец воткнуть примерно следующее:
$sents[$j][] = "keyword";
тогда keyword будет вставлятся в конец предложения

оу! Спасибо

понял в какую сторону смотреть.

chesser · 03.06.2010, 17:40

не проверял, но что-то вроде такого:

PHP код:


			
.....
for ($i=0; $i<$num; ++$i){
                $sents[$j][$i] = $prev;
                ++$result_count;
                $p = $this->prepared[$prev][mt_rand(0, count($this->prepared[$prev]) - 1)];
                if ($p == '') $p = array_rand($this->prepared);
                $prev = $p;
                if ($prev == '') break 2;
                $sents[$j][] = array_pop($this->kwds); // <<<<<<<<<<<<<<<<<<<<<<<< это вот надо добавить
            }

.....
$source =  file_get_contents("text.txt");
$markov = new MarkovChains($source);
$markov->kwds = array('key1', 'key2', 'key3'); // <<<<<<<<<<<<<<<<<<<<<<<< и это
$result = $markov->GenerateText(100);

это если в конец, если в начало, то перед циклом $sents[$j][0] = array_pop($this->kwds); и цикл начать не с нуля, а с 1
а еще можно кейворды адаптировать в текст

чтобы читалось красиво

~~seeker~~ · 03.06.2010, 18:40

запихиваешь весь текст в массив (например 100 слов = 100 элементов)
потом печатаешь:
1-50 элементов
кей
51-100 элементов

googleum · 03.06.2010, 19:21

черт, тоже шас долблю етот скрипт.)))
но дело в том что скрипт как то одинакого генерит текст. брал текст 300-1000кб. он кагбе берет одни и и те же предложения и по ним генерит. в начале предложения часто повторяються одинаковы кеи. порефрешь скрипт и посмотри.

вот бы вытянуть с ред батона генерилку по кею. может у кого что есть готовое уже?)