当前位置：首页 > news >正文

deepseek的使用技巧与组合

news 来源：原创 2025/6/18 5:51:02

1、 deepseek介绍

深度求索（DeepSeek）是一家专注实现AGI（通用人工智能）的中国公司，成立于2023年，核心团队来自清华、北大等顶尖高校及知名科技企业。该公司开源了多个大模型，并在代码、数学推理等领域表现突出。以下是其代表性模型的介绍：

1.1. 通用大模型

1.1.1 DeepSeek-R1

定位通用领域，支持复杂任务处理，如数据分析、逻辑推理等。
通过强化学习优化指令遵循能力，适合企业级场景（如客服、决策支持）。

1.1.2 DeepSeek 67B

670亿参数的闭源模型，在数学、代码等专业基准测试中超越Llama2、GPT-3.5。
支持长上下文窗口（最高128k tokens），适合长文本分析。

1.2. 代码模型

DeepSeek-Coder
支持33种编程语言，代码生成准确率高，尤其擅长Python、Java等主流语言。
提供代码补全、注释生成、错误修复等功能，开源版本（7B/33B）可在Hugging Face获取。

1.3. 数学推理模型

DeepSeek-Math
专攻数学问题求解，支持LaTeX公式解析，适用于教育、科研场景。
在MATH数据集上表现优异，能处理复杂数学证明和计算。

1.4. 多模态模型

DeepSeek-Vision
结合视觉与语言理解，支持图像描述、图文问答、图表分析等跨模态任务。
可应用于内容审核、教育辅助等领域。

1.5 技术亮点

高效架构：采用MoE（混合专家）结构，如DeepSeek-MoE-16b-base，在保持模型规模的同时降低计算成本。
长上下文优化：支持超长文本输入，减少信息截断问题。
开源生态：部分模型代码和权重开源（Apache 2.0协议），推动开发者社区共建。

1.6 deepseek 模式选择

1.6.1简单问答（不用选深度思考功能，默认使用V3）

简单事实类问题（如“某年某事件时间”）无需开启深度思考

1.6.2逻辑推理（深度思考,使用R1）

复杂数学题分步解答
代码逻辑优化与错误修复
长文本摘要与关键信息提取

1.6.3实时数据

涉及到实时数据的（2023年12月份之前的），关闭联网搜索
涉及到实时数据的（2023年12月份之后的），开启联网搜索

2、deepseek提示语技巧

参考视频文件：

在这里插入图片描述
首先，我是否正真的理清脑海中想法
其次，我是否能够通过文字准确传达这个想法

2.1 五个共识

共识1：忘记以前的提示模板：不需要角色设定，不需要思维链提示，不需要结构化提示词，不需要解释，不需要事例
共识2：仍需要告诉AI足够的背景信息：干什么、给谁干、目的是什么、约束是什么（我需要写一篇“妈妈的爱”的伦理文章，作为幼儿故事，简单易懂，幽默，且真实。字数限制200字）
共识3：用乔哈里分析你到底告诉AI多少信息
- 人知道AI知道：简单说
  - 人知道AI不知道：喂投式

在这里插入图片描述
- 人不知道AI知道：提问题

 - 人不知道A不I知道：开放聊

在这里插入图片描述

共识4：是否可以大白话方式交流

在这里插入图片描述

共识5：是否需要指定思考步骤，取决与你是否希望AI严格执行

2.2 使用的8大技巧

技巧1：要求明确

在这里插入图片描述

技巧2：不要定义过程

在这里插入图片描述

技巧3：明确受众

在这里插入图片描述

技巧4：联网功能（与最近实时相关的）

在这里插入图片描述

技巧5：补充额外信息

在这里插入图片描述

技巧6：上下文的联系VS清楚记忆

在这里插入图片描述
- 注意1：上下文记忆有限

- 注意2：输出长度有限

- 如何清楚之前的记忆

技巧7：反馈与迭代优化

 - 情况1：对做出回答进一步追问、优化

在这里插入图片描述

情况2：
基于上面方案，重新复盘后生成一个新的方案

技巧8：复杂问题，分步拆解

在这里插入图片描述

3、deepseek使用之4大避坑

避坑1：冗长提示词污染关键词

在这里插入图片描述

避坑2：避免复杂句式和模糊词语

在这里插入图片描述

避坑3:

在这里插入图片描述

避坑4：过度角色扮演

在这里插入图片描述

4、场景举例

4.1 场景1 数学与物理题

在这里插入图片描述

4.2 场景2 代码能力

在这里插入图片描述

4.3场景3 写作&文案能力

在这里插入图片描述

4.4 场景4 文本摘要

在这里插入图片描述

4.5 场景5 生成图标（mermaid、svg、xmind）

在这里插入图片描述

4.5.1 生成mermaid流程图

在这里插入图片描述
生成mermaid文字后复制到在线转换器上就可以了

4.5.2生成mermaid甘特图

在这里插入图片描述
生成mermaid文字后复制到在线转换器上就可以了

在这里插入图片描述

4.6 场景6 日常生活

在这里插入图片描述

4.7 场景7 职业场景

在这里插入图片描述

4.8 场景8：简历生成

在这里插入图片描述

4.9 场景9 模拟面试

在这里插入图片描述

5、deepseek+xmind（生成脑图）

5.1 使用deepseek生成xmind的markdown文本

将你的要求输入deepseek，并要求生成xmind的markdown文本（生成mermaid格式也可以，后面操作一样，复制内容，转换为md文件）
在这里插入图片描述

在这里插入图片描述

5.2 将内容复制记事本并修改为md格式

将生成的内容复制到即记事本中，并将文件修改为md格式
在这里插入图片描述

5.3导入xmind

在这里插入图片描述

6、deepseek+kimi（生成PPT）

6.1 生成PPT文案大纲

在deepseek中提出你的需求，并要求按照markdown格式输出
在这里插入图片描述

6.2 利用kimi生成PPT主要内容

在这里插入图片描述

6.3 一键生成PPT

在这里插入图片描述

7、deepSeek+word

文件——选项——自定义功能——开发者工具
在这里插入图片描述
文件——选项——自定义功能——信任中心——信任中心设置——宏设置——勾选“启用所有宏”和“信任对VBA……”——确定——确定

开发工具——Visual Basic

以下有两种情况，第一种时在Normal中插入模块，第二种是在Project中插入模块。但插入模块的操作是一样的。先介绍插入模块操作。
右击（Normal/Project）——选择插入模块
在这里插入图片描述

R1模型代码（注意将“填写你的API KEY”内容改为你的API，引号不要去）

Function CallDeepSeekAPI(api_key As String, inputText As String) As String
    Dim API As String
    Dim SendTxt As String
    Dim Http As Object
    Dim status_code As Integer
    Dim response As String

    API = "https://api.deepseek.com/chat/completions"
    SendTxt = "{""model"": ""deepseek-reasoner"", ""messages"": [{""role"":""system"", ""content"":""请根据用户的问题给出详细的解答。""}, {""role"":""user"", ""content"":""" & inputText & """}], ""stream"": false}"
    
    Set Http = CreateObject("MSXML2.XMLHTTP")
    With Http
        .Open "POST", API, False
        .setRequestHeader "Content-Type", "application/json"
        .setRequestHeader "Authorization", "Bearer " & api_key
        .send SendTxt
        status_code = .Status
        response = .responseText
    End With
    
    ' 弹出窗口显示 API 响应（调试用）
    
    ' MsgBox "API Response: " & response, vbInformation, "Debug Info"
    
    If status_code = 200 Then
        CallDeepSeekAPI = response
    Else
        CallDeepSeekAPI = "Error: " & status_code & " - " & response
    End If
    
    Set Http = Nothing
End Function

Sub DeepSeekR1()
    Dim api_key As String
    Dim inputText As String
    Dim response As String
    Dim regex As Object
    Dim reasoningRegex As Object
    Dim contentRegex As Object
    Dim matches As Object
    Dim reasoningMatches As Object
    Dim originalSelection As Object
    Dim reasoningContent As String
    Dim finalContent As String

    api_key = "填写你的API KEY"
    If api_key = "" Then
        MsgBox "Please enter the API key."
        Exit Sub
    ElseIf Selection.Type <> wdSelectionNormal Then
        MsgBox "Please select text."
        Exit Sub
    End If
    
    ' 保存原始选中的文本
    Set originalSelection = Selection.Range.Duplicate
    
    inputText = Replace(Replace(Replace(Replace(Replace(Selection.text, "\", "\\"), vbCrLf, ""), vbCr, ""), vbLf, ""), Chr(34), "\""")
    response = CallDeepSeekAPI(api_key, inputText)
    
    If Left(response, 5) <> "Error" Then
        ' 创建正则表达式对象来分别匹配推理内容和最终回答
        Set reasoningRegex = CreateObject("VBScript.RegExp")
        With reasoningRegex
            .Global = True
            .MultiLine = True
            .IgnoreCase = False
            .Pattern = """reasoning_content"":""(.*?)"""
        End With
        
        Set contentRegex = CreateObject("VBScript.RegExp")
        With contentRegex
            .Global = True
            .MultiLine = True
            .IgnoreCase = False
            .Pattern = """content"":""(.*?)"""
        End With
    
        ' 提取推理内容
        Set reasoningMatches = reasoningRegex.Execute(response)
        If reasoningMatches.Count > 0 Then
            reasoningContent = reasoningMatches(0).SubMatches(0)
            reasoningContent = Replace(reasoningContent, "\n\n", vbNewLine)
            reasoningContent = Replace(reasoningContent, "\n", vbNewLine)
            reasoningContent = Replace(Replace(reasoningContent, """", Chr(34)), """", Chr(34))
        End If
    
        ' 提取最终回答
        Set matches = contentRegex.Execute(response)
        If matches.Count > 0 Then
            finalContent = matches(0).SubMatches(0)
            finalContent = Replace(finalContent, "\n\n", vbNewLine)
            finalContent = Replace(finalContent, "\n", vbNewLine)
            finalContent = Replace(Replace(finalContent, """", Chr(34)), """", Chr(34))
    
            ' 取消选中原始文本
            Selection.Collapse Direction:=wdCollapseEnd
    
            ' 插入推理过程（如果存在）
            If Len(reasoningContent) > 0 Then
                Selection.TypeParagraph
                Selection.TypeText "推理过程："
                Selection.TypeParagraph
                Selection.TypeText reasoningContent
                Selection.TypeParagraph
                Selection.TypeText "最终回答："
                Selection.TypeParagraph
            End If
    
            ' 插入最终回答
            Selection.TypeText finalContent
    
            ' 将光标移回原来选中文本的末尾
            originalSelection.Select
        Else
            MsgBox "Failed to parse API response.", vbExclamation
        End If
    Else
        MsgBox response, vbCritical
    End If
End Sub

V3模型代码（注意将“填写你的API KEY”内容改为你的API，引号不要去）

Function CallDeepSeekAPI(api_key As String, inputText As String) As String
    Dim API As String
    Dim SendTxt As String
    Dim Http As Object
    Dim status_code As Integer
    Dim response As String

    API = "https://api.deepseek.com/chat/completions"
    SendTxt = "{""model"": ""deepseek-chat"", ""messages"": [{""role"":""system"", ""content"":""You are a Word assistant""}, {""role"":""user"", ""content"":""" & inputText & """}], ""stream"": false}"
    
    Set Http = CreateObject("MSXML2.XMLHTTP")
    With Http
        .Open "POST", API, False
        .setRequestHeader "Content-Type", "application/json"
        .setRequestHeader "Authorization", "Bearer " & api_key
        .send SendTxt
        status_code = .Status
        response = .responseText
    End With
    
    ' 弹出窗口显示 API 响应（调试用）
    
    ' MsgBox "API Response: " & response, vbInformation, "Debug Info"
    
    If status_code = 200 Then
        CallDeepSeekAPI = response
    Else
        CallDeepSeekAPI = "Error: " & status_code & " - " & response
    End If
    
    Set Http = Nothing
End Function

Sub DeepSeekV3()
    Dim api_key As String
    Dim inputText As String
    Dim response As String
    Dim regex As Object
    Dim matches As Object
    Dim originalSelection As Object

    api_key = "填写你的API KEY"
    If api_key = "" Then
        MsgBox "Please enter the API key."
        Exit Sub
    ElseIf Selection.Type <> wdSelectionNormal Then
        MsgBox "Please select text."
        Exit Sub
    End If
    
    ' 保存原始选中的文本
    Set originalSelection = Selection.Range.Duplicate
    
    inputText = Replace(Replace(Replace(Replace(Replace(Selection.text, "\", "\\"), vbCrLf, ""), vbCr, ""), vbLf, ""), Chr(34), "\""")
    response = CallDeepSeekAPI(api_key, inputText)
    
    If Left(response, 5) <> "Error" Then
        Set regex = CreateObject("VBScript.RegExp")
        With regex
            .Global = True
            .MultiLine = True
            .IgnoreCase = False
            .Pattern = """content"":""(.*?)"""
        End With
        Set matches = regex.Execute(response)
        If matches.Count > 0 Then
            response = matches(0).SubMatches(0)
            response = Replace(Replace(response, """", Chr(34)), """", Chr(34))
    
            ' 取消选中原始文本
            Selection.Collapse Direction:=wdCollapseEnd
    
            ' 将内容插入到选中文字的下一行
            Selection.TypeParagraph ' 插入新行
            Selection.TypeText text:=response
    
            ' 将光标移回原来选中文本的末尾
            originalSelection.Select
        Else
            MsgBox "Failed to parse API response.", vbExclamation
        End If
    Else
        MsgBox response, vbCritical
    End If
End Sub

保存后关闭Visual Basic（注意不要关闭word）
文件——选项——自定义功能区——开发工具——新建组——重命名
在这里插入图片描述
点击选择新建的组——下拉位置选择命令——宏——选择相应模型——添加

重命名后确定——确定

验证：输入你要提问的问题——选中问题——点击开发工具中相应模型，
配置成功的化，会反馈相应结果。
在这里插入图片描述
注意如果你是在project中插入的模块，还需以下操作（在normal下插入模块无需下面操作）
另存为宏模板（如果不另存宏模板，打开其它word文件，仍然无法使用）

将存好的文件复制到 C:\Users\用户名\AppData\Roaming\Microsoft\Word\STARTUP目录下（当然你也可以在另存时直接存放到该路径下），操作前请将隐藏文件取消
在这里插入图片描述