library(VariantAnnotation)
library(gwasglue2)
library(dplyr)
library(tidyr)
library(CMplot)
library(TwoSampleMR)
library(genbin)
library(genio)
library(MRPRESSO)
library(plinkbinr)
library(MRinstruments)
inputFile="ieu-a-816.vcf.gz" #输入文件(根据下载暴露数据的文件名称进行修改)
setwd("C:\\Users\\feh\\Desktop\\NB MR\\04.exposure") #设置工作目录
#读取输入文件, 并对输入文件进行格式转换
vcfRT <- readVcf(inputFile)data=gwasvcf_to_TwoSampleMR(vcf=vcfRT, type="exposure")
Error in gwasvcf_to_TwoSampleMR(vcf = vcfRT, type = "exposure") : could not find function "gwasvcf_to_TwoSampleMR"