登录
OEIS基金会得到了OEIS用户的捐赠和西蒙斯基金会的资助。

 

标志


提示
(问候来自整数序列在线百科全书!)
A0693年 由自同构RoblDownCar_et_交换引起的自然数置换!对由编码的括号执行操作A014486号. 7

%我

%S 0,1,3,2,6,8,7,4,5,14,15,19,20,22,16,21,17,9,10,18,11,12,13,37,38,39,

%电话40,41,51,52,53,54,55,60,61,62,64,42,43,56,57,63,44,58,45,23,24,46,25,

%U 26,27,47,59,48,28,29,49,30,31,32,50,33,34,35,36107108109110111

%N由自同构RoblDownCar_et_交换引起的自然数置换!作用于由A014486编码的括号。

%H A.Karttunen,<A href=“http://www.iki.fi/~karturi/matikka/Nekomorphisms/gatomorf.htm”>Gatomorphisms/gatomorf.htm(包括计算该序列的完整方案程序)

%H<a href=“/index/Per#IntegerPermutation”>索引自然数置换序列的条目</a>

%o(在列表结构上实现这种自同构的Scheme函数:)(define(RoblDownCar_et_Swap!s) (条件((不是(配对?s) ))(不是(配对?(cdr s))(交换!s) )(其他(罗布!s) (机械人汽车交换!(s)车辆)

%o(定义(机器人!s) (let((ex car(s car)))(设置汽车!s(cddr s))(设置cdr!(cdr s)ex car)(交换!(cdr s))(交换!s) s)段)

%o(定义(交换!s) (let((ex car(s car)))(设置汽车!s(cdr s))(设置cdr!前s)车辆)

%与A069774的Y轴相反,car/cdr翻转A057501的共轭物,即A069773(n)=A057163(A057501(A057163(n)))。参见A069775。

%不知道

%0.3度

%A_Antti Karttunen,2002年4月16日

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

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

上次修改日期:美国东部时间2020年10月20日21:32。包含337910个序列。(运行在oeis4上。)