IT 免費/無料/Kostenlos(gratis) 記事本分享: AI

      A               B              C
1 年度        行銷費X        銷售額Y
2 109               2                50
3 110               3                66
4 111               6                54
5 112               9                88
6 113               12            96

💚EXCEL預先準備環境
檔案 | 選項 |增益集 | 設定
增益集| 勾選分析工具箱 | 確定

💚EXCEL分析操作設定，資料 | 資料分析 | 迴歸 |確定
輸入Y範圍(Y): 工作表1!$C$2:$C$6
輸入X範圍(X): 工作表1!$B$2:$B$6

EXCEL迴歸分析產出結果，如下:
摘要輸出

迴歸統計
R 的倍數    0.883984674
R 平方    0.781428904
調整的 R 平方    0.708571872
標準誤    11.02650511
觀察值個數    5

ANOVA
   自由度    SS    MS    F    顯著值
迴歸    1    1304.048555    1304.048555    10.72551108    0.046601631
殘差    3    364.7514451    121.583815
總和    4    1668.8

   係數    標準誤    t 統計    P-值    下限 95%    上限 95%    下限 95.0%    上限 95.0%
截距    43.01734104    9.812397095    4.38397882    0.021976561    11.78991416    74.24476792    11.78991416    74.24476792
X 變數 1    4.341040462    1.325515578    3.274982607    0.046601631    0.12265831    8.559422615    0.12265831    8.559422615

💚AI Prompt提示詞，下法，如藍色部分
有一個EXCEL表,第1列為標題列,A欄為年度,B欄為行銷費X,C欄為銷售額Y,
請用EXCEL VBA,利用其資料分析迴歸分析 ,產出迴歸直線圖 ,
X軸為 B欄，Y軸為C欄,處理圖表直到最後1筆 ,
請畫出迴歸直線 ,並且將其迴歸直線函數,表示出來

ＡＩ產出之巨集程式，執行CreateRegressionChart巨集，即可產製EXCEL圖表

Sub CreateRegressionChart()

    Dim ws As Worksheet
    Dim LastRow As Long
    Dim DataRange As Range
    Dim XRange As Range
    Dim YRange As Range
    Dim Regression As Object
    Dim RegressionEquation As String

    ' 指定ＥＸＣＥＬ表數據，放置之⌈工作表⌋名稱
    Set ws = ThisWorkbook.Sheets("工作表1") '


    ' 找出資料筆數之總數
    LastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row

    ' 設定X和Y的範圍
    Set XRange = ws.Range("B2:B" & LastRow)    ' B欄為X軸

    Set YRange = ws.Range("C2:C" & LastRow)       ' C欄為Y軸

    ' 使用LINEST函數，進行迴歸分析
'    RegressionData = WorksheetFunction.LinEst(YRange, XRange, True, True)
    RegressionData = WorksheetFunction.LinEst(YRange, XRange, True, True)

    ' 提取斜率和截距
    Slope = RegressionData(1, 1)
    Intercept = RegressionData(1, 2)

    ' 在工作表中，顯示迴歸方程式

    ws.Range("E2").Value = "Regression Equation:"
    ws.Range("F2").Value = "Y = " & Slope & " * X + " & Intercept

    ' 繪製線性圖表
    Dim ChartObj As ChartObject
    Dim TrendlineChart As Chart

    ' 刪除現有的圖表
    For Each ChartObj In ws.ChartObjects
        ChartObj.Delete
    Next ChartObj

    ' 新增趨勢線圖表
    Set ChartObj = ws.ChartObjects.Add(Left:=100, Width:=375, Top:=75, Height:=225)
    Set TrendlineChart = ChartObj.Chart

    ' 添加散點圖
    With TrendlineChart
        .ChartType = xlXYScatter
        .SetSourceData Source:=ws.Range("B2:C" & LastRow)
        .HasTitle = True
        .ChartTitle.Text = "Regression Analysis"

        ' 添加趨勢線
        With .SeriesCollection.NewSeries
            .XValues = XRange
            .Values = YRange
            .Trendlines.Add(Type:=xlLinear).Select
            .Trendlines(1).DisplayEquation = True
            .Trendlines(1).DisplayRSquared = False
        End With

        ' 設定軸標籤
        .Axes(xlCategory, xlPrimary).HasTitle = True
        .Axes(xlCategory, xlPrimary).AxisTitle.Text = "X行銷費"
        .Axes(xlValue, xlPrimary).HasTitle = True
        .Axes(xlValue, xlPrimary).AxisTitle.Text = "Y銷售額"
    End With
End Sub

2024年2月10日星期六

從日本的表演藝術「落語」學習日文

古典落語の名作(落語主題) 芝浜　目黒のさんま　寿限無　饅頭こわい　火焔太鼓　時そば　らくだ　紙入れ　死神

落語家，把說話變成藝術，由眼神、言談、語調、舉止，讓我聯想到司馬中原老師講故事一樣令人如癡如醉🍸

說明一:將下面PROMPT提示句樣版(即藍色部分)，全數複製，並貼到 AI神器去詢問。
說明二:受限查詢顯示字數限制，顯示過程可能僅呈現片斷停頓住現象(內容好像尚未完成)，故請鍵入提示詞つづき　　告知AI接續上面未完成部分。

相關パフォーマンス:
時そば
 寿限無
 饅頭こわい
 死神

相關查詢:
藉由AI神器💯，來學習日本語彙整索引資訊

あなたは今まさに有名な落語家だ（三遊亭円楽、桂歌丸、柳家小三治、春風亭一之輔、林家木久扇）。
Google、Wikipediaなどの検索エンジンで検索できます（古典落語名作選）、{{落語主題}}は全文リストしてください、
情報量が多い場合は表形式（演者名、演目名、あらすじ、主な登場人物、聞きどころ、成立年代、分類、関連する動画）にすることもできる。
また、1500字から2500字程度の断片を作成し、難解な部分や特別な意味をひらがなで詳しく説明し
歴史的な言及に加えて、フレーズの重要な部分の文法を詳しく説明してください。
最後になりますが、{{落語主題}}関連した動画を当てたYOUTUBE動画はリストアップしてください。

”””
落語主題:芝浜
”””

藉由AI(Gemini 、ChatGPT..)，試作日文句型分析，梳理出句子結構

情境:有時候句子較長，只能見樹不見林，所以先藉由AI神器幫忙，針對自己想瞭解的句子(即 理解したい文章)，預做簡易架構分析。
另外，可依句子片段資訊，找尋其原始文件參考相關資訊，並翻成中文梳理出文章頭緒，供學習參考。

說明1:請AI參考網路日文老師(如:Amber.L)之句型分析資訊，或自網路搜尋相關句子分析資源，協助句子架構之分析。

說明2: 使用方式，請將下面藍色部分提示詞，複製貼至 AI神器去詢問。

說明3:個人學習方式，可用手機翻譯(照相)功能,將段落日文文章辧識成文字，再將文章貼到待解析文章處(即 理解したい文章)，以便由AI協助解析文章架構。

相關查詢:
藉由AI神器💯，來學習日本語彙整索引資訊

藉由AI，協助解析並び替え(句子重組)題型

藉由AI，協助解答 4選1題型之日文考題

あなたは日本語教育を受けたプロの教師です。

いくつか理解したい文章があります。主に主語、賓語、格助詞の分析に基づいた文章フレーム構成の図表化で挙げてください。

以下の{{參考網址}}を参照してください。また、Googleなどの検索エンジンで文章構造分析に関連するウェブ情報（例えば、日本語の文法機能タイプ付き単語依存構造解析）もお願いします。

理解したい文章の断片によって、元記事または関連記事をGoogleなどの検索エンジンで挙げてください。

最後に、繁体字中国語に翻訳してください。

參考網址:
https://wordrabbit.jp/grammar/
https://www.lemonstera.com/doc/b3418fdba063153889ad9e66ca587f30
https://www.sohu.com/a/207261583_500680

理解したい文章は以下の通り
"""
道義によって君主を補佐するならば、軍事力の強大さによって天下の人々を従わせようとはしないことだ。そうすれば天下の人々はきっと道義をもって応じてくれよう。軍事的な圧力をかけると周囲に茨が生えたように反抗する勢力も起きてくるようになり、戦争は結局、進めば進むほど自分も傷ついていく、茨の道だということがわかるようになる
"""

從中國古典文學出發，藉由AI神器另闢日文學習管理。

情境:中國古時候人的智慧，創造經典文學大作<<易經>>，欽佩莫名、五體投地，想藉由古人的智慧，將自己的生活中疑慮(僕の悩みや葛藤している事)，運用AI技術進行占卜及解卦象，並提供參考建言(僅供參考，有些可能天馬行空，內容描述完整，可能有助於AI提供較明確回答資訊?)，並可隨時轉換成自己想學習的語言。