OFFSET
1,1
COMMENTS
For all n, it seems to be the case that transits of the circumference occurring exactly at the corners do not exist. The pattern repeats itself at a half circle. The triangle count in a quadrant by rows can be arranged as an irregular triangle as shown in the illustration. The rows count (A242396) is equal to the case centered at (0,0), A242394.
LINKS
Kival Ngaokrajang, Illustration of initial terms
PROG
(Small Basic)
a[0]=3
iy=0
For n = 1 To 100
r=n/(math.Power(3, 0.5)/2)
If r-math.Floor(r)>=0.5 Then
ix=1
Else
ix=0
EndIf
If n=1 Then
d1=0
Else
If ix=iy Then
d1=3
Else
if ix=1 and iy=0 Then
d1=5
Else
d1=4
EndIf
EndIf
EndIf
iy=ix
a[n]=a[n-1]+d1
TextWindow.Write(2*(2*a[n]+1)+", ")
EndFor
CROSSREFS
KEYWORD
nonn
AUTHOR
Kival Ngaokrajang, May 13 2014
STATUS
approved