(define seqA036378 (list 1 2 2 5 7 13 23 43 75 137 255 464 872 1612 3030 5709 10749 20390 
 38635 73586 140336 268216 513708 985818 1894120 3645744 7027290 
 13561907 26207278))
;Value: seqa036378

(define seqA095298 (list 0 1 2 8 15 30 67 154 302 611 1280 2546 5207 10447 21123 42783 85726 
 173102 347243 698544 1401784 2813930 5644165 11328192 22712057 45538473 
 91288241 182965151 366691833))
;Value: seqa095298

(map (lambda (x y) (ratio->float-str x y 6)) seqA095298 seqA036378)
;Value 22: ("0" "0.5" "1." "1.6" "2.142857" "2.307692" "2.913043" "3.581395" "4.026667" "4.459854" "5.019608" "5.487069" "5.97133" "6.480769" "6.971287" "7.493957" "7.975254" "8.489554" "8.987783" "9.492893" "9.98877" "10.491283" "10.987107" "11.49116" "11.990823" "12.490859" "12.990533" "13.491108" "13.991985")

(map (lambda (n) (ratio->float-str (- n 1) 2 1)) (iota 29))
;Value 24: ("0" "0.5" "1." "1.5" "2." "2.5" "3." "3.5" "4." "4.5" "5." "5.5" "6." "6.5" "7." "7.5" "8." "8.5" "9." "9.5" "10." "10.5" "11." "11.5" "12." "12.5" "13." "13.5" "14.")

(map (lambda (x y n) (ratio->float-str (/ x y ) (/ (- n 1) 2) 6)) seqA095298 seqA036378 (iota 29))
;Value 25: ("1" "1." "1." "1.066667" "1.071429" "0.923077" "0.971014" "1.023256" "1.006667" "0.991079" "1.003922" "0.997649" "0.995222" "0.997041" "0.995898" "0.999194" "0.996907" "0.998771" "0.998643" "0.999252" "0.998877" "0.99917" "0.998828" "0.999231" "0.999235" "0.999269" "0.999272" "0.999341" "0.999427")
(map (lambda (x y n) (ratio->float-str (/ (- n 1) 2) (/ x y ) 6)) seqA095298 seqA036378 (iota 29))
;Value 26: ("1" "1." "1." "0.9375" "0.933333" "1.083333" "1.029851" "0.977273" "0.993377" "1.009002" "0.996094" "1.002357" "1.004801" "1.002967" "1.004119" "1.000806" "1.003103" "1.00123" "1.001359" "1.000749" "1.001124" "1.000831" "1.001173" "1.000769" "1.000765" "1.000732" "1.000729" "1.000659" "1.000573")



(map (lambda (x y) (ratio->float-str x y 6)) seqA095353 seqA095354)
;Value 27: ("1" "1" "1." "1.5" "2." "2.333333" "2.333333" "2.8" "3.285714" "3.181818" "3.5" "3.916667" "4.189189" "4.418182" "4.785714" "4.873016" "5.358586" "5.575758" "5.871179" "6.100852" "6.382705" "6.676225" "6.954266" "7.223132" "7.489542" "7.773978" "8.045173" "8.331323" "8.598659" "8.886546" "9.161734" "9.440489" "9.71936" "9.995484" "10.266207" "10.54327" "10.820602")


(map (lambda (n) (ratio->float-str (A010049 n) (A000045 n) 6)) (iota 37))
;Value 30: ("1." "1." "1.5" "1.666667" "2." "2.25" "2.538462" "2.809524" "3.088235" "3.363636" "3.640449" "3.916667" "4.193133" "4.469496" "4.745902" "5.02229" "5.298685" "5.575077" "5.851471" "6.127864" "6.404257" "6.68065" "6.957044" "7.233437" "7.50983" "7.786223" "8.062616" "8.33901" "8.615403" "8.891796" "9.168189" "9.444582" "9.720976" "9.997369" "10.273762" "10.550155" "10.826548")

(define (div x y) (cond ((and (zero? x) (zero? y)) 1) ((zero? y) 0) (else (/ x y))))
;Value: div

(map (lambda (x y n) (ratio->float-str (div x y) (/ (A010049 n) (A000045 n)) 6)) seqA095353 seqA095354 (iota 37))
;Value 31: ("1." "1." "0.666667" "0.9" "1." "1.037037" "0.919192" "0.99661" "1.063946" "0.945946" "0.96142" "1." "0.999059" "0.988519" "1.008389" "0.970278" "1.011305" "1.000122" "1.003368" "0.995592" "0.996635" "0.999338" "0.999601" "0.998575" "0.997298" "0.998427" "0.997837" "0.999078" "0.998056" "0.99941" "0.999296" "0.999567" "0.999834" "0.999811" "0.999265" "0.999347" "0.999451")
(map (lambda (x y n) (ratio->float-str  (/ (A010049 n) (A000045 n)) (div x y) 6)) seqA095353 seqA095354 (iota 37))
;Value 32: ("1." "1." "1.5" "1.111111" "1." "0.964286" "1.087912" "1.003401" "0.939898" "1.057143" "1.040128" "1." "1.000941" "1.011614" "0.991681" "1.030633" "0.988822" "0.999878" "0.996643" "1.004428" "1.003377" "1.000663" "1.000399" "1.001427" "1.002709" "1.001575" "1.002168" "1.000923" "1.001947" "1.000591" "1.000705" "1.000434" "1.000166" "1.000189" "1.000736" "1.000653" "1.00055")