Look-and-Say 数列

1, 11, 21, 1211, 111221

d, 1d, 111d, 311d, 13211d, 111312211d, 31131122211d, …

/*
node las.js
 */
function lookAndSay(str) {
    return str.replace(/(.)\1*/g, function(seq, p1){return seq.length.toString() + p1})
}

var num = "1";
for (var i = 10; i > 0; i--) {
    console.log(num);
    num = lookAndSay(num);
}

/*
* @Author: suifengtec
* @Date:   2017-08-22 03:45:05
* @Last Modified by:   suifengtec
* @Last Modified time: 2017-08-22 03:51:02
*/
/*
node las1.js
 */
function lookAndSay(digits) {
    var result = '',
        chars = (digits + ' ').split(''),
        lastChar = chars[0],
        times = 0;
 
    chars.forEach(function(nextChar) {
        if (nextChar === lastChar) {
            times++;
        }
        else {
            result += (times + '') + lastChar;
            lastChar = nextChar;
            times = 1;
        }
    });
 
    return result;
}
 
(function output(seed, iterations) {
    for (var i = 0; i < iterations; i++) {
        console.log(seed);
        seed = lookAndSay(seed);
    }
})("1", 10);

-- @Author: suifengtec
-- @Date:   2017-08-22 03:51:07
-- @Last Modified by:   'suifengtec'
-- @Last Modified time: 2017-08-22 03:56:18
--a lua implement of the look-and-say sequence
-- lua las.lua
function lookAndSay(n)
  local t = {1}
  return function()
    local ret = {}
    for i, v in ipairs(t) do
      if t[i-1] and v == t[i-1] then
        ret[#ret - 1] = ret[#ret - 1] + 1
      else
        ret[#ret + 1] = 1
        ret[#ret + 1] = v
      end
    end
    t = ret
    n = n - 1
    if n > 0 then return table.concat(ret) end
  end
end
for i in lookAndSay(10) do print(i) end

<?php

/**
 * @Author: suifengtec
 * @Date:   2017-08-22 03:57:46
 * @Last Modified by:   'suifengtec'
 * @Last Modified time: 2017-08-22 03:59:52
 */
/*
php -S 127.0.0.1:9988 
http://127.0.0.1:9988/las.php
 */
function lookAndSay($str) {
 
	return preg_replace_callback('#(.)\1*#', function($matches) {
		return strlen($matches[0]).$matches[1];
	}, $str);
}
 
$num = '1';

foreach(range(1,10) as $i) {
	echo $num.'<br/>';
	$num = lookAndSay($num);
}

# -*- coding: utf-8 -*-
# @Author: suifengtec
# @Date:   2017-08-22 04:00:59
# @Last Modified by:   'suifengtec'
# @Last Modified time: 2017-08-22 04:02:27

#
# Look and Say 数列的 Python 实现
# python las.py
#


def lookAndSay(number):
    result = ""

    repeat = number[0]
    number = number[1:]+" "
    times = 1

    for actual in number:
        if actual != repeat:
            result += str(times)+repeat
            times = 1
            repeat = actual
        else:
            times += 1

    return result

num = "1"

for i in range(10):
    print(num)
    num = lookAndSay(num)

/*
rustc -o rs.exe las.rs && rs
 */
fn las(in_seq: &[i8]) -> Vec<i8> {
    assert!(!in_seq.is_empty());
 
    let mut result = Vec::new();
    let mut current_number = in_seq[0];
    let mut current_runlength = 1;
 
    for i in &in_seq[1..] {
        if current_number == *i {
            current_runlength += 1;
        } else {
            result.push(current_runlength);
            result.push(current_number);
            current_runlength = 1;
            current_number = *i;
        }
    }
    result.push(current_runlength);
    result.push(current_number);
    result
}
 
fn main() {
    let mut seq = vec![1];
 
    for i in 0..10 {
        println!("{}=>{:?}", i, seq);
        seq = las(&seq);
    }
}

/*
* @Author: coolwp.com
* @Date:   2017-08-22 01:55:09
* @Last Modified by:   suifengtec
* @Last Modified time: 2017-08-22 02:37:27
**/

package main

import (
	"fmt"
	"math"
	"strconv"
	"strings"
)

// 获取以 1 为种子数的Look-and-say 数列任意位置的数字
func getNumberOfLookAndSaySequeceSeed1(position int) int {

	if position == 1 {
		return 1
	}
	if position == 2 {
		return 11
	}

	str := "11"

	for i := 3; i <= position; i++ {
		str += "$"
		length := len(str)
		tmp := ""
		cnt := 1
		for j := 1; j < length; j++ {
			strSlice := strings.Split(str, "")
			if strSlice[j] != strSlice[j-1] {
				cntTmp := strconv.Itoa(cnt)
				tmp += cntTmp
				tmp += strSlice[j-1]
				cnt = 1
			} else {
				cnt++
			}
		}

		str = tmp
	}

	v, err := strconv.Atoi(str)
	//v, err := strconv.ParseInt(str, 10, 64)
	if err != nil {
		return -1
	}
	if v > math.MaxInt32 {
		return -1
	}

	return v

}

// 给定任意种子数 seed, 获取 LookAndSay 数列的 第 position 项
func getNumberOfLookAndSaySequece(seed int, position int) int {

	if seed == 22 {
		return 22
	}
	if position == 1 {
		return seed
	}
	seedStr := strconv.Itoa(seed)
	str := "2" + seedStr
	if position == 2 {
		v, err := strconv.Atoi(str)
		if err != nil {
			return -1
		}
		if v > math.MaxInt32 {
			return -1
		}
		return v
	}

	for i := 3; i < position; i++ {
		str += "$"
		length := len(str)
		tmp := ""
		cnt := 1
		for j := 1; j < length; j++ {
			strSlice := strings.Split(str, "")
			if strSlice[j] != strSlice[j-1] {

				cntTmp := strconv.Itoa(cnt)
				tmp += cntTmp
				tmp += strSlice[j-1]
				cnt = 1
			} else {
				cnt++
			}
		}

		str = tmp
	}

	r, err := strconv.Atoi(str)
	if err != nil {
		return -1
	}
	if r > math.MaxInt32 {
		return -1
	}

	return r
}

func main() {

	position := 5
	a := getNumberOfLookAndSaySequeceSeed1(position)

	seed := 1
	pos := 5
	b := getNumberOfLookAndSaySequece(seed, pos)

	fmt.Println(a)
	fmt.Println(b)

}