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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A325594型 约瑟夫问题对称变化后的最后余数。 1
1, 1, 3, 4, 3, 6, 1, 3, 9, 1, 11, 5, 11, 7, 9, 14, 5, 12, 7, 12, 11, 14, 9, 22, 5, 20, 7, 28, 3, 30, 1, 11, 25, 9, 27, 5, 35, 7, 33, 3, 41, 1, 43, 5, 43, 7, 41, 19, 33, 17, 35, 13, 43, 15, 41, 27, 33, 25, 35, 29, 35, 31 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,3
评论
约瑟夫问题的一种变体,在每个阶段消除两个数字,一个顺时针消除,另一个逆时针消除。为了解决歧义,通常的约瑟夫问题优先。
链接
松井浩史、山内俊彦、松松美、井上隆美、内藤正树和宫德良,约瑟夫问题的有趣变体《计算机代数-算法设计、实现和应用》,Kokyuroku,数学科学研究所,第1652号,(2009),44-54。
Masakazu Naito和Ryohei Miyadera,双向约瑟夫问题,Wolfram示范项目。
Masakazu Naito、Sohtaro Doro、Daisuke Minematsu和Ryohei Miyadera,约瑟夫问题及其变体的自相似性《视觉数学》,第11卷,第2期,2009年。
配方奶粉
A165556号(n) =第2版。
数学
joseboth[m_,mm_]:=块[{t,p,q,u,v,w},w=mm-1;t=范围[m];p=t;q=t;Do[p=向左旋转[p,w];u=第一[p];p=静止[p];q=下降[q,位置[q,u][[1]];如果[Length[p]==1,Break[],];q=向右旋转[q,w];v=最后[q];q=下降[q,-1];p=落差[p,位置[p,v][[1]]];如果[Length[q]==1,Break[],],{n,1,Ceiling[m/2]}];p[[1];
交叉参考
囊性纤维变性。A006257号,A165556号.
关键字
非n
作者
戈登·阿特金森2019年9月7日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年4月23日18:16。包含371916个序列。(在oeis4上运行。)