# Computed 2017-11-03 in MIT/GNU Scheme Release 9.0.1 || Microcode 15.1 || Runtime 15.7 || Win32 1.8 || SF 4.41 || LIAR/i386 4.118 || Edwin 3.116
#
# with the following Scheme-program (see also https://github.com/karttu/IntSeq )
#
# (define (A003023 n)
#   (let loop ((visited (list n)) (i 0))
#      (let ((next (A001065 (car visited))))
#          (cond ((zero? next) i)
#                ((member next visited) (+ 1 i))
#                (else (loop (cons next visited) (+ 1 i)))
#          )
#      )
#   )
# )
# 
# (define (A001065 n) (- (A000203 n) n))
# 
# With A000203 implemented as under Program-section of https://oeis.org/A000203
#
1 0
2 1
3 1
4 2
5 1
6 1
7 1
8 2
9 3
10 3
11 1
12 6
13 1
14 4
15 4
16 5
17 1
18 3
19 1
20 6
21 2
22 5
23 1
24 4
25 2
26 6
27 2
28 1
29 1
30 14
31 1
32 2
33 5
34 7
35 2
36 3
37 1
38 6
39 2
40 3
41 1
42 13
43 1
44 4
45 6
46 7
47 1
48 5
49 3
50 2
51 3
52 8
53 1
54 12
55 2
56 4
57 2
58 3
59 1
60 10
61 1
62 8
63 2
64 3
65 2
66 11
67 1
68 4
69 3
70 5
71 1
72 8
73 1
74 4
75 4
76 4
77 2
78 10
79 1
80 6
81 4
82 5
83 1
84 5
85 2
86 8
87 6
88 6
89 1
90 9
91 3
92 5
93 3
94 3
95 3
96 8
97 1
98 2
99 3
100 4
101 1
102 17
103 1
104 6
105 7
106 5
107 1
108 9
109 1
110 6
111 2
112 8
113 1
114 16
115 2
116 4
117 3
118 9
119 3
120 11
121 7
122 4
123 7
124 5
125 2
126 15
127 1
128 2
129 2
130 5
131 1
132 10
133 3
134 6
135 8
136 7
137 1
138 177
139 1
140 4
141 4
142 5
143 3
144 8
145 3
146 5
147 5
148 10
149 1
150 176
151 1
152 11
153 5
154 7
155 2
156 7
157 1
158 6
159 3
160 10
161 2
162 3
163 1
164 6
165 8
166 9
167 1
168 174
169 5
170 8
171 2
172 8
173 1
174 15
175 2
176 4
177 3
178 6
179 1
180 51
181 1
182 8
183 3
184 5
185 2
186 14
187 2
188 11
189 2
190 9
191 1
192 12
193 1
194 5
195 5
196 3
197 1
198 13
199 1
200 3
201 2
202 7
203 2
204 9
205 2
206 6
207 8
208 6
209 2
210 51
211 1
212 10
213 5
214 7
215 4
216 9
217 3
218 9
219 3
220 2
221 2
222 175
223 1
224 16
225 7
226 5
227 1
228 7
229 1
230 8
231 6
232 10
233 1
234 174
235 2
236 6
237 2
238 6
239 1
240 10
241 1
242 2
243 8
244 10
245 2
246 14
247 6
248 11
249 7
250 10
251 1
252 16
253 3
254 6
255 4
256 5
257 1
258 13
259 7
260 10
261 3
262 7
263 1
264 30
265 2
266 8
267 4
268 7
269 1
270 12
271 1
272 11
273 3
274 5
275 2