This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A352088 #4 Mar 05 2022 01:07:17
%S A352088 0,1,3,5,45,2193,7671,35889,53835,74825,3026205,31953871,86582437,
%T A352088 117169915,128873391,701373669,868430067,15262037703,45305389845,
%U A352088 104484026691,614071181169,14894476590363,24382189266573,86808432666553,869188423288227,1352557858988953
%N A352088 Numbers whose binary and minimal tribonacci representations are both palindromic.
%e A352088 The first 5 terms are:
%e A352088 n a(n) A007088(a(n)) A278038(a(n))
%e A352088 -------------------------------------
%e A352088 1 0 0 0
%e A352088 2 1 1 1
%e A352088 3 3 11 11
%e A352088 4 5 101 101
%e A352088 5 45 101101 1000001
%t A352088 t[1] = 1; t[2] = 2; t[3] = 4; t[n_] := t[n] = t[n - 1] + t[n - 2] + t[n - 3]; tribPalQ[n_] := Module[{s = {}, m = n, k}, While[m > 0, k = 1; While[t[k] <= m, k++]; k--; AppendTo[s, k]; m -= t[k]; k = 1]; PalindromeQ[FromDigits @ IntegerDigits[Total[2^(s - 1)], 2]]]; Join[{0}, Select[Range[1, 10^5, 2], PalindromeQ[IntegerDigits[#, 2]] && tribPalQ[#] &]]
%Y A352088 Intersection of A006995 and A352087.
%Y A352088 Cf. A007088, A278038.
%Y A352088 Similar sequences: A095309, A331193, A331894, A351713, A351718.
%K A352088 nonn,base
%O A352088 1,3
%A A352088 _Amiram Eldar_, Mar 04 2022