登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A260750型 龙曲线三点上部倒转。如果D:[0,1]是一条龙曲线,那么如果k是任何大于log_2(a(n)/15)的整数,除了n之外,还有两个较小的整数p和q,其中D(a(p)/。 6
23, 46, 47, 92, 83, 94, 107, 173, 184, 163, 143, 166, 188, 167, 203, 214, 329, 346, 341, 368, 333, 227, 331, 326, 293, 283, 263, 286, 287, 332, 376, 377, 323, 334, 369, 347, 383, 406, 428, 407, 658, 659, 692, 682, 736, 671, 666, 663, 661, 443, 454, 569, 662, 652, 586, 581, 573, 467, 571, 566, 533, 523, 503, 526, 527, 572, 563, 574, 587, 653, 664, 643, 752, 623, 754, 753, 646, 751, 668, 739, 761, 738, 647, 737, 683, 694, 729, 707, 743, 766, 767, 812, 856, 857, 803, 814, 849, 827, 863 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
评论
请参阅数学部分中的dragun,以获得连续的、充满空间的Dragon函数及其多值逆函数的精确求值器。
对于分组的三元组,使用Dragon(A260748型(n) )=龙(A260749型(n) )=龙(A260750型(n) )。(也就是说,它们是“共形的”。)
链接
Brady Haran和Don Knuth,错误转向龙,数字视频(2014)
维基百科,龙形曲线
例子
为了明确起见,我们选择复杂平面中的龙,龙(0)=0,龙(1)=1,龙(1/3)=1/5+2i/5
(I^2:=-1)然后使用A(3)=47,对于k=2,3,4,{dragun[47/60],dragun[47/120],dragun[47/240]}
->{2/3+I/6},{1/4+(5I)/12},}-(1/12)+I/3}}
这些图像具有反转图像取消标记/@First/@%
{{37/60, 13/20, 47/60}, {37/120, 13/40, 47/120}, {37/240, 13/80, 47/240}}
德拉贡[47/15/2^k]=德拉贡[29/15/2^k]=dragun[37/15/2|k],经验上=(5/3-I)(1+I)^k2^(-1-k)
所以每八分之一点是5/6-I/2的16次方。
数学
(*朱利安·齐格勒·亨茨*)
分段递归分形[x_,f_,whit_,iters_,fns_]:=分段递归分形[x,g_,which,iters,fns]=((分段递归分形[x,h,which,iters,fns]:=块[{y},y/.求解[f[y]=h[y],y]]);并集@@((fns[[#]]/@piecwiserecursivefractal[iters[[#]][x],Composition[f,fns[#]],which,iters,fns]);
dragun[t]:=分段递归分形[t,恒等式,分段[{{1},0<=#<=1/2},{{2},1/2<=#<=1}},}]&,{2*#&,2*(1-#)&},(1+I)*#/2&,(I-1)*#/2+1&}]
解压缩[z_]:=分段递归分形[z,恒等式,如果[-(1/3)<=Re[#]<=7/6&&(1/3)<=Im[#]<=2/3,{1,2},{}]&,{#*(1-I)&,(1-#)*(1+I)&},}#/2&,1-#/2&}]
删除重复[Reap[Do[If[Length[#]>2,Sow[15*64*#[[3]]]&@
脱下[德拉贡[k/15/64][1],{k,0,288*3}]][2,1]]
(*或128或256或…*)
交叉参考
关键字
非n
作者
高斯珀2015年7月30日
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新的seq。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:美国东部夏令时2024年6月20日19:46。包含373532个序列。(在oeis4上运行。)