Find some kind of pattern in array (sequence of the numbers)

[anatol]

Hello ! it`s me again
Today my new challenge is "find pattern in numbers"
Situation :
I`ve got numbers stored in LIST object, random but nonrepeating and sorted . For example 1.2.12.17.19.21.25.26.36
I need to find in this numbers some kind of pattern. For example A.A+1.A+10. In my example i would have found two patterns - 1.2.12 and 25.26.36

How to do this in CF ?
Thank you

[schrodinger]

Think you'll have to tackle those patterns one by one,
like checking them in a fastloop through the list

i.e.
assuming your different numbers are stored one for each row of the list:

on triggering action
>>> start loop "find pattern" List Nb Lines( "List" ) times

on loop "find pattern"
+ val(listlinetext$("list", loopindex("find pattern") +1 )) = val(listlinetext$("list", loopindex("find pattern"))) +1
+ val(listlinetext$("list", loopindex("find pattern") +2 )) = val(listlinetext$("list", loopindex("find pattern"))) +10
>>> pattern found starting from line: loopindex("find pattern")

(pseudocode from top of the mind - be warned! )

and of course you can check as many patterns you need by adding other on loop "find pattern" events

[anatol]

Think you'll have to tackle those patterns one by one,
like checking them in a fastloop through the list

i.e.
assuming your different numbers are stored one for each row of the list:

on triggering action
>>> start loop "find pattern" List Nb Lines( "List" ) times

on loop "find pattern"
+ val(listlinetext$("list", loopindex("find pattern") +1 )) = val(listlinetext$("list", loopindex("find pattern"))) +1
+ val(listlinetext$("list", loopindex("find pattern") +2 )) = val(listlinetext$("list", loopindex("find pattern"))) +10
>>> pattern found starting from line: loopindex("find pattern")

(pseudocode from top of the mind - be warned! )

and of course you can check as many patterns you need by adding other on loop "find pattern" events

Damn... It is WORKS !! Thank you man ! really appreciate your help !

[anatol]

Hm... everything cool , exept one thing - This worked only in "linear bruteforce".
if i need to check something about A. A+10. A+12 in 1.2.6.7.8.9.10.11.12.17.18 it will receive nothing.
although all numbers that i need is here = 1.10.12

is there any ideas ?

[schrodinger]

mm yeah thought you had to search for patterns
(repeating elements in same "configuration" you specified)

if you need to search all of those elements in any position
I would suggest saving your list of elements in a string,
just as you write it in your post, but with additional start and end delimiter
(this will be needed for find string later):

.1.2.6.7.8.9.10.11.12.17.18.

let's call it "my_string"

and then:

1) use the string tokenizer to split my_string at "."

2) fire loop "my_loop" numberofelements times

3)

on loop "my_loop"
Find(my_string, "."+Str$( Val( Element$( "String tokenizer", LoopIndex("my_loop") ) )+10 )+".", 0) >= 0
Find(my_string, "."+Str$( Val( Element$( "String tokenizer", LoopIndex("my_loop") ) )+12 )+".", 0) >= 0
>>> pattern found for number: Element$( "String tokenizer", LoopIndex("my_loop") )

(real code above so you can plug and play in "compare two general values, pattern in red)

not tested, but should work, hopefully..


(btw, the numbers are not there, it should be 1.11.13, change pattern or string for testing )

[anatol]

mm yeah thought you had to search for patterns
(repeating elements in same "configuration" you specified)

if you need to search all of those elements in any position
I would suggest saving your list of elements in a string,
just as you write it in your post, but with additional start and end delimiter
(this will be needed for find string later):

.1.2.6.7.8.9.10.11.12.17.18.

let's call it "my_string"

and then:

1) use the string tokenizer to split my_string at "."

2) fire loop "my_loop" numberofelements times

3)

on loop "my_loop"
Find(my_string, "."+Str$( Val( Element$( "String tokenizer", LoopIndex("my_loop") ) )+10 )+".", 0) >= 0
Find(my_string, "."+Str$( Val( Element$( "String tokenizer", LoopIndex("my_loop") ) )+12 )+".", 0) >= 0
>>> pattern found for number: Element$( "String tokenizer", LoopIndex("my_loop") )

(real code above so you can plug and play in "compare two general values, pattern in red)

not tested, but should work, hopefully..


(btw, the numbers are not there, it should be 1.11.13, change pattern or string for testing )

Brilliant idea ! completely forgot about stringtokenizer !

[anatol]

... well. It doesn`t work . Spend several hours to understand why ... but .. i give up
Everything should work . But it is not working

[schrodinger]

odd, it works for me, with just the events I wrote above:

find_pattern.mfa

did you fix your test string as stated here?

(btw, the numbers are not there, it should be 1.11.13, change pattern or string for testing )

did you add start and ending "." in the string?

[anatol]

odd, it works for me, with just the events I wrote above:

find_pattern.mfa

did you fix your test string as stated here?



did you add start and ending "." in the string?

Hmmm... I tried yesterday with string parser, but not string tokenizer. may be this is the problem .
Thank you ! Look like i finally got ideal algorithm.