RMarkdown does not display Japanese when outputting PDF

 title: "Teaching: Introduction to Multivariate Analysis"
author: "practice"
date: "2021/5/6"
output:
  pdf_document:
    latex_engine —xelatex
    number_sections —true
mainfont —Hiragino Kaku Gothic Pro

{r setup, include=FALSE}
knitr::opts_chunk$set(fig.width=8,fig.height=5)
library(tidyverse)
library(socviz)
library (ggplot2)
library(gapminder)
library(tidyr)
library (lattice)

{reading}
data<-read.csv("~/Documents/r_sample/R_Multivariate Analysis 0726/Chapter 03/Customer Satisfaction Data.csv", fileEncoding="CP932")