16S扩增子之Vsearch使用

16S扩增子之Vsearch使用,第1张

1.概览

2.PE reads拼接( fastq_mergepairs )

3.质量控制( fastx_filter )

5.统计OTUs或ASVs的计数值

以下为Usearch的使用,接去冗余那一步之后

整理自 https://mp.weixin.qq.com/s/MTZFWIqr1dqO-fwUQ8Pb4g

Private Sub Command1_Click()

End Sub

Function sReplace(SearchLine As String, SearchFor As String, ReplaceWith As String)

Dim vSearchLine As String, found As Integer

found = InStr(SearchLine, SearchFor): vSearchLine = SearchLine

If found <> 0 Then

vSearchLine = ""

If found > 1 Then vSearchLine = Left(SearchLine, found - 1)

vSearchLine = vSearchLine + ReplaceWith

If found + Len(SearchFor) - 1 < Len(SearchLine) Then _

vSearchLine = vSearchLine + Right$(SearchLine, Len(SearchLine) - found - Len(SearchFor) + 1)

End If

sReplace = vSearchLine

End Function

sReplace是自定义过程 不能将整个过程内容写到按钮事件里 需要调用只需要写

Private Sub Command1_Click()

sReplace("参数1","参数2","参数3")

End Sub

根据实际修改参数内容

通用办法:

在某个网址,看了某个视频很喜欢想要保存下来要怎么做?一步步来~前提要先在网页上看完整。

然后 菜单栏——>工具——>Internet选项

弹出新窗口,在“浏览历史记录”处找到“设置”点开

弹出选项卡,点开“查看文件

弹出一个新窗口。

接下来按大小排列文件,找到该文件夹里最大的几个文件

复制那个较大的文件到桌面(有不止一个的话要自己选选看了)

一般来说网页上的视频都是flv格式的,改一下后缀,ok啦~


欢迎分享,转载请注明来源:夏雨云

原文地址:https://www.xiayuyun.com/zonghe/126978.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-03-15
下一篇2023-03-15

发表评论

登录后才能评论

评论列表(0条)

    保存