# #——回声= FALSE,结果=“隐藏”,消息= FALSE ------------------------------- 需要(knitr)美元opts_chunk组(错误= FALSE,消息= FALSE,警告= FALSE)图书馆(BiocNeighbors ) ## ----------------------------------------------------------------------------- 脑袋< - 10000 ndim < - < 20数据矩阵(runif(脑袋* ndim), ncol = ndim ) ## ----------------------------------------------------------------------------- 输出端< - findKNN(数据、k = 10,BNPARAM = KmknnParam())头(输出端指数美元)头(输出端距离美元 ) ## ----------------------------------------------------------------------------- 输出端指数[3美元 ,] ## ----------------------------------------------------------------------------- 输出端距离[3美元 ,] ## ----------------------------------------------------------------------------- nquery ndim < < - 1000 - 20查询< -矩阵(runif (nquery * ndim),ncol = ndim ) ## ----------------------------------------------------------------------------- qout < - queryKNN(数据、查询、k = 5, BNPARAM = KmknnParam())头(qout美元指数)头(qout距离美元 ) ## ----------------------------------------------------------------------------- qout指数[3美元 ,] ## ----------------------------------------------------------------------------- qout距离[3美元 ,] ## ----------------------------------------------------------------------------- findKNN(数据,k = 5,= 3:5子集 ) ## ----------------------------------------------------------------------------- 名称(findKNN(数据,k = 2, get.distance = FALSE )) ## ----------------------------------------------------------------------------- 库(BiocParallel) < - findKNN(数据、k = 10 BPPARAM = MulticoreParam (3 )) ## ----------------------------------------------------------------------------- 前< - buildIndex(数据,BNPARAM = KmknnParam())着干活< - findKNN (BNINDEX =前,k = 5) out2 < queryKNN (BNINDEX =前,查询=查询,k = 2 ) ## ----------------------------------------------------------------------------- 出去了。m < - findKNN(数据、k = 5 BNPARAM = KmknnParam(距离= "曼哈顿 ")) ## ----------------------------------------------------------------------------- sessionInfo ()