Group Abstract Group Abstract

Message Boards Message Boards

0
|
710 Views
|
1 Reply
|
0 Total Likes
View groups...
Share
Share this post:
GROUPS:
Algebra

How to deduce the preceding several terms of a sequence from its recurrence relation?

Bill Blair
Posted 4 months ago
POSTED BY: Bill Blair
1 Reply
Sort By:
Bill Blair
Bill Blair
Posted 4 months ago 
  CollatzTree[val_, steps_] := 
     NestList[
      Flatten[# /. 
         n_Integer :> {2 n, 
           If[IntegerQ[(n - 1)/3] && 
             OddQ[(n - 1)/3] && (n - 1)/3 > 1, (n - 1)/3, 
            Nothing]}] &, {val}, steps]
    CollatzTree[16, 5] // Column
POSTED BY: Bill Blair
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Tag limit exceeded
Note: Only the first five people you tag will receive an email notification; the other tagged names will appear as links to their profiles.
Reply Preview
Attachments
Remove
or Discard