Revision History for A364965
(Underlined text is an addition;
strikethrough text is a deletion.)
Showing all changes.
|
| |
| |
| |
|
|
#7 by Michael De Vlieger at Fri Sep 01 15:23:57 EDT 2023
| |
| |
| |
|
|
#6 by Antti Karttunen at Fri Sep 01 14:54:15 EDT 2023
| |
| |
| |
|
|
#5 by Antti Karttunen at Fri Sep 01 14:47:53 EDT 2023
|
|
| DATA
|
3, 27, 315, 3003, 42757, 72765, 195195, 799425, 13873275, 18131225
|
|
| KEYWORD
|
nonn,more,changed
|
| |
| |
|
|
#4 by Antti Karttunen at Fri Sep 01 10:19:38 EDT 2023
| |
| |
|
|
Discussion
|
| Fri Sep 01
| 10:26
| Antti Karttunen: 13873275, 18131225, 66825759 should also be terms.
|
| |
| |
|
|
#3 by Antti Karttunen at Fri Sep 01 10:15:21 EDT 2023
|
|
| CROSSREFS
|
Sequence A163511(A364495(n)), for n>1, sorted into ascending order.
|
| |
| |
|
|
#2 by Antti Karttunen at Fri Sep 01 09:35:30 EDT 2023
|
|
| NAME
|
allocatedOdd numbers k such that k is a formultiple Anttiof KarttunenA243071(k).
|
|
| DATA
|
3, 27, 315, 3003, 42757, 72765, 195195, 799425
|
|
| OFFSET
|
1,1
|
|
| PROG
|
(PARI)
A243071(n) = if(n<=2, n-1, my(f=factor(n), p, p2=1, res=0); for(i=1, #f~, p = 1 << (primepi(f[i, 1]) - 1); res += (p*p2*(2^(f[i, 2]) - 1)); p2 <<= f[i, 2]); ((3<<#binary(res\2))-res-1)); \\ (Combining programs given in A156552 and A054429)
isA364965(n) = ((n>1)&&(n%2)&&!(n%A243071(n)));
|
|
| CROSSREFS
|
Cf. A243071.
Cf. also A364498, A364551.
|
|
| KEYWORD
|
allocated
nonn
|
|
| AUTHOR
|
Antti Karttunen, Sep 01 2023
|
|
| STATUS
|
approved
editing
|
| |
| |
|
|
#1 by Antti Karttunen at Mon Aug 14 13:07:36 EDT 2023
|
|
| NAME
|
allocated for Antti Karttunen
|
|
| KEYWORD
|
allocated
|
|
| STATUS
|
approved
|
| |
| |
|
|
