We appreciate Dr. Kosuke Teshima from Kyushu University for modification of this script
Reading the vcf file... target SNP rs4988235 target position 136608646calculating LD...max(r^2) is 0.9191Threshold is 0.0919Candidate core region should be between 136474541 136827600Calculating Fc...Done.10 Fc values from the smallest[start pos, end pos] Fc[136602491, 136652045] 0.0059[136552188, 136652045] 0.0061[136552517, 136652045] 0.0062[136552526, 136652045] 0.0062[136554797, 136652045] 0.0062[136555484, 136652045] 0.0062[136555525, 136652045] 0.0062[136545844, 136652045] 0.0062[136546927, 136652045] 0.0062[136552188, 136640787] 0.0063Fc = 0.0059core region = [136602491, 136652045]Please contact satta@soken.ac.jp for any questions.
(June 12 2019)