# コレスポンデンス分析とは？Rでのやり方を見ていこう！

> 当サイト【スタビジ】の本記事では、マーケティングで用いられることの多い統計的手法「コレスポンデンス分析」について簡単に解説していきたいと思います。Rを使えば簡単に実装できるので合わせて実装方法も見ていきますよー！

- URL: https://toukei-lab.com/correspondence
- 公開: 2022.11.29 / 更新: 2024.12.15
- サイト: スタビジ（https://toukei-lab.com）

:::talk{who="umatan"}
当サイト【スタビジ】の本記事では、マーケティングで用いられることの多い統計的手法「コレスポンデンス分析」について簡単に解説していきたいと思います。Rを使えば簡単に実装できるのであわせて実装方法も見ていきますよー！
:::

こんにちは！

データサイエンティストのウマたん([@statistics1012](https://twitter.com/statistics1012?lang=ja))です！

多変量解析手法の1つでありアンケート調査の可視化などに使われる「**コレスポンデンス分析**」

コレスポンデンス分析は、<mark>データの可視化に非常に優れた手法であり、マーケティングの場でよく使われます。</mark>

この記事では、そんなコレスポンデンス分析についてRでの実装も含めて見ていきましょう！

:::talk{who="umatan"}
Rを使えば、コレスポンデンス分析を簡単に実装できるんだ！
:::

## コレスポンデンス分析とは

![コレスポンデンス分析](/wp-content/uploads/2022/11/e3b3faafab53514d7f772578f8438b98.png)

まずは、コレスポンデンス分析について見ていきましょう！

コレスポンデンス分析は、<mark>商品・サービスの特徴を可視化するのに優れた分析手法であり、マーケティングにおける調査に良く使われます。</mark>

[多変量解析](/multivariate-analysis)における数量化3類と考え方はほぼ同じです。

例えば、新たに化粧品の商品開発を行い競合とのイメージを比較したい時に消費者に対して以下のような項目を回答してもらいます。

<table class="table">
<tbody>
<tr>
<td></td>
<td>しっとり</td>
<td>安心感</td>
<td>持ちの良さ</td>
<td>香りの良さ</td>
</tr>
<tr>
<td>自社製品</td>
<td></td>
<td></td>
<td></td>
<td></td>
</tr>
<tr>
<td>競合A</td>
<td></td>
<td></td>
<td></td>
<td></td>
</tr>
<tr>
<td>競合B</td>
<td></td>
<td></td>
<td></td>
<td></td>
</tr>
</tbody>
</table>

これらの点数を基に自社製品は消費者にとってどのようなイメージを持たれているのかを簡単に可視化することが可能なのです。

これだけであれば表でも比較できるかもしれませんが、項目数や比較したい競合数が増えてくると表だけではどうしても分かりづらくなってきます。

そんな時にコレスポンデンス分析の出番なのです！！

以下イメージ図です。

![](/wp-content/uploads/2019/08/corepon.jpg)

このように<mark>簡単にマッピングして、分かりやすく自社製品の特徴を捉える</mark>ことができるのです。

ただここで注意しておかないといけないのは、<mark>自社製品は香りの良さが近い！という直感的な解釈をしてはいけないということ。</mark>

これは方向性の解釈をするのに適しており、距離的な比較はできない点に注意してください。

## コレスポンデンス分析をRで実装してみよう！

![](/wp-content/uploads/2018/08/PAK85_MBAdesagyou20140312_TP_V-e1557018085482.jpg)

それでは、早速コレスポンデンス分析をRで実装してみます。

コレスポンデンス分析は、<mark>非常に簡単に実装できちゃうんです。</mark>

使用するデータは、統計科学研究所の「成績データ」。以下のURLからダウンロードできます。

<https://statistics.co.jp/reference/statistical_data/statistical_data.htm>

<table border="0" cellspacing="0" cellpadding="0" class="table">
<colgroup>
<col span="9"> </colgroup>
<tbody>
<tr>
<td>kokugo</td>
<td>shakai</td>
<td>sugaku</td>
<td>rika</td>
<td>ongaku</td>
<td>bijutu</td>
<td>taiiku</td>
<td>gika</td>
<td>eigo</td>
</tr>
<tr>
<td align="right">30</td>
<td align="right">43</td>
<td align="right">51</td>
<td align="right">63</td>
<td align="right">60</td>
<td align="right">66</td>
<td align="right">37</td>
<td align="right">44</td>
<td align="right">20</td>
</tr>
<tr>
<td align="right">39</td>
<td align="right">21</td>
<td align="right">49</td>
<td align="right">56</td>
<td align="right">70</td>
<td align="right">72</td>
<td align="right">56</td>
<td align="right">63</td>
<td align="right">16</td>
</tr>
<tr>
<td align="right">29</td>
<td align="right">30</td>
<td align="right">23</td>
<td align="right">57</td>
<td align="right">69</td>
<td align="right">76</td>
<td align="right">33</td>
<td align="right">54</td>
<td align="right">6</td>
</tr>
<tr>
<td align="right">95</td>
<td align="right">87</td>
<td align="right">77</td>
<td align="right">100</td>
<td align="right">77</td>
<td align="right">82</td>
<td align="right">78</td>
<td align="right">96</td>
<td align="right">87</td>
</tr>
<tr>
<td align="right">70</td>
<td align="right">71</td>
<td align="right">78</td>
<td align="right">67</td>
<td align="right">72</td>
<td align="right">82</td>
<td align="right">46</td>
<td align="right">63</td>
<td align="right">44</td>
</tr>
<tr>
<td align="right">67</td>
<td align="right">53</td>
<td align="right">56</td>
<td align="right">61</td>
<td align="right">61</td>
<td align="right">76</td>
<td align="right">70</td>
<td align="right">66</td>
<td align="right">40</td>
</tr>
<tr>
<td align="right">29</td>
<td align="right">26</td>
<td align="right">44</td>
<td align="right">52</td>
<td align="right">37</td>
<td align="right">68</td>
<td align="right">33</td>
<td align="right">43</td>
<td align="right">13</td>
</tr>
</tbody>
</table>

9科目の点数が166人分入ってます。

166人から30人抽出してコレスポンデンス分析にかけてみます。

コレスポンデンス分析はMASSパッケージのcorrepという関数で行うことが可能です。

コードは以下のように非常に簡単に実装が可能なんです。

```r title="corepon.R"
library(MASS)
seiseki<-read.csv('seiseki.csv')
seiseki<-seiseki[c(1:30),]
seiseki.ca<-corresp(seiseki,nf=2)
biplot(seiseki.ca)
```

最後の行で、結果をプロットしています。

![](/wp-content/uploads/2019/08/Rplot.png)

音楽と英語が他の科目と少し離れていることが分かります。

これにより、<mark>科目同士の近さが分かりました。</mark>

先ほども述べましたが、人と科目の距離を比較して得意・不得意を比較することは厳密にはできない点に注意しましょう！

実装自体非常に簡単なので、色んなデータセットで試してみてください！

## コレスポンデンス分析　まとめ

本記事では、**コレスポンデンス分析**について見てきました。

市場調査などでよく使われるコレスポンデンス分析は非常に便利な手法なので、是非使ってみてください。

以下の書籍でコレスポンデンス分析と同じ数量化3類に関して詳しくまとめているので良ければ参考にしてみてください！

::product[多変量解析法入門 (ライブラリ新数学大系)]{url="https://www.amazon.co.jp/dp/4781909809?tag=statistic08-22&linkCode=ogi&th=1&psc=1" image="https://m.media-amazon.com/images/I/41VuCyhVaEL._SL160_.jpg" amazon="https://www.amazon.co.jp/dp/4781909809?tag=statistic08-22&linkCode=ogi&th=1&psc=1" rakuten="https://af.moshimo.com/af/c/click?a_id=858168&p_id=54&pc_id=54&pl_id=616&url=https%3A%2F%2Fsearch.rakuten.co.jp%2Fsearch%2Fmall%2F%25E5%25A4%259A%25E5%25A4%2589%25E9%2587%258F%25E8%25A7%25A3%25E6%259E%2590%25E6%25B3%2595%2F%3Ff%3D1%26grp%3Dproduct"}

多変量解析手法については以下の記事でより詳しくまとめていますので見てみてください！

<https://toukei-lab.com/multivariate-analysis>

マーケティングでよく使われるデータ分析手法は以下でまとめています！

<https://toukei-lab.com/marketing-data>

また、統計学や機械学習やPythonやデータサイエンスについてより深く学びたい方は以下の記事で詳しくまとめています！

<https://toukei-lab.com/statistics-freshman>

<https://toukei-lab.com/machine-learning-study>

<https://toukei-lab.com/python-learn>

<https://toukei-lab.com/data-scientist>