来自在线整数百科全书的问候语!http://oeis.org/ Search: id:a088162 Showing 1-1 of 1 %I A088162 %S A088162 0,0,3,0,6,3,21,18,12,3,0,39,33,30,24,15,6,3,90,84,81,72,66,57,45,39, %T A088162 36,30,27,21,0,186,177,174,159,156,147,138,132,123,114,111,96,93,87, %U A088162 84,66,48,42,39,33,24,21,6,381,372,363,360,351,345,342,327,306,300,297,291 %N A088162 n-th prime rotated one binary place to the right less the n-th prime rotated one binary place to the left. %C A088162 Can never be negative and equals zero iff p is 2 or a Mersenne prime (A000668). %t A088162 f[n_] := FromDigits[ RotateRight[ IntegerDigits[n, 2]], 2] - FromDigits[ RotateLeft[ IntegerDigits[n, 2]], 2]; Table[ f[ Prime[n]], {n, 1, 70}] %Y A088162 Cf. A088146 - A088147. %K A088162 nonn %O A088162 1,3 %A A088162 _Robert G. Wilson v_, Sep 13 2003 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE