Puzzle, I used SQL to see what happend next.

-- Puzzle.
--
-- Using SQL I wanted to see what happend with the following puzzle.
--
--
--
-- 1
-- 1 1
-- 2 1
-- 1 2 1 1
-- 1 1 1 2 2 1
-- 3 1 2 2 1 1
--
--
-- Question is wat is the next line?
-- And the line after that?
--
-- How does this progress when you continue?
-- For the last question I used SQL.

ben.brugman (1/18/2013)

-- Puzzle.
--
-- Using SQL I wanted to see what happend with the following puzzle.
--
--
--
--                      1
--                     1 1
--                     2 1
--                   1 2 1 1
--                 1 1 1 2 2 1
--                 3 1 2 2 1 1
--
--
-- Question is wat is the next line?
-- And the line after that?
--
-- How does this progress when you continue?
-- For the last question I used SQL.

First line contains a 1, each next line describes the the line above.
So the first line contains one 1. (1 1).
The second line contains two 1's (2 1)
The third line contains one 2 and one 1 (1 2 1 1)
etc.

I used replaces to continue this trend, just to see what was happening. I'll post the script for that in a next episode, not to give away part of the 'knowledge'. I used some of the kwowledge to build the solution. I would like to see other solutions, often others can come up with a far more elegant (or more efficient or both) solutions.

Although posts not always contain have a usable solution, I always learn from the anwsers, often showing solution methods and techniques which open my mind.

ben brugman

declare @continue int = 1
declare @DeString varchar(4000) = '1'
declare @counter int = 0

While @continue = 1
begin

set @DeString = REPLACE(@destring, '1111','fourone')
set @DeString = REPLACE(@destring, '111','threeone')
set @DeString = REPLACE(@destring, '11','twoone')
set @DeString = REPLACE(@destring, '1','oneone')
set @DeString = REPLACE(@destring, '2222','fourtwo')
set @DeString = REPLACE(@destring, '222','threetwo')
set @DeString = REPLACE(@destring, '22','twotwo')
set @DeString = REPLACE(@destring, '2','onetwo')
set @DeString = REPLACE(@destring, '3333','fourthree')
set @DeString = REPLACE(@destring, '333','threethree')
set @DeString = REPLACE(@destring, '33','twothree')
set @DeString = REPLACE(@destring, '3','onethree')
set @DeString = REPLACE(@destring, 'three','3')
set @DeString = REPLACE(@destring, 'two','2')
set @DeString = REPLACE(@destring, 'one','1')

print convert(varchar(4),@counter)+' '+convert(varchar(20),datalength(@destring)) +' ' +
convert(varchar(200),@destring)
set @counter = @counter + 1
if @counter > 100 begin set @continue = 0 end
if @DeString like '%four%' begin set @continue = 0 end
if datalength(@destring)>2000 begin set @continue = 0 end
end

declare @s varchar(4000) = '1'
declare @iterations int = 10
declare @i int = 1

print cast(@i as varchar(10)) + ': ' + @s
while @i <= @iterations
begin
select @s =
ltrim(
(
select ' ' + cast(count(*) as varchar(10)) + ' ' + item as [text()]
from (
select itemnumber, item, itemnumber - rank() over (partition by item order by itemnumber) g
from dbo.delimitedSplit8k(@s,' ')
) a
group by item, g
order by min(itemnumber)
FOR XML PATH (''), TYPE).value('text()[1]', 'varchar(8000)')
)
--select itemnumber, item, itemnumber - row_number() over (order by item) g
--from dbo.delimitedSplit8k(@s,' ')
set @i += 1
print cast(@i as varchar(10)) + ': ' + @s
end