用户画像

为了更好的实现精准营销、精细化运营，是指用户在互联网留下的种种数据，主动或被动地收集，最后加工成一系列的标签。
用户画像（User Profile）本质是对任何一个用户都能用标签和数据描述，方便在精准营销中将用户群体切割成更细的粒度，或者分析群体用户的属性变化等。

R语言实现用户画像词云展示

使用范围：一列评论或者标题本文数据。（如下图）
1、安装wordcloud2包

 install.packages("wordcloud2")

2、运行程序包

    library(jiebaR,jiebaRD) library(wordcloud2)

3、导入数据

news <- read.csv(''C:/Users/Administrator/Desktop/news.csv'') #读取csv格式文件
news <- read_excel(''C:/Users/Administrator/Desktop/news.csv'') #读取xls 和 xlsx 格式文件
text<-news$x #提取文本数据所在列（在news文件下该列名称为x）

4、分词+去停用词（分成词块并去除无意义的词）

    mixseg<-worker("mix") #建立模型分词a<-segment(text,mixseg) #开始分词stopwords <- read.table("C:/Users/Thinkpad/Desktop/停用词.txt")class(stopwords) stopwords <- as.vector(stopwords[,1]) wordResult <- removeWords(a,stopwords)

5、绘制词云

freq<-table(a) #词频统计
freq   #查看词频统计结果
wordcloud2(freq,shape='star') #绘制词云

参数：

wordcloud2(data, size = 1, minSize = 0, gridSize =  0,
fontFamily = 'Segoe UI', fontWeight = 'bold',
color = 'random-dark', backgroundColor = "white",
minRotation = -pi/4, maxRotation = pi/4, shuffle = TRUE,
rotateRatio = 0.4, shape = 'circle', ellipticity = 0.65,
widgetsize = NULL, figPath = NULL, hoverFunction = NULL)

data：包含每列中的word和freq的数据帧，按照word出现的顺序由内向外画图（可以按照freq降序美化wordcloud）。

size：字体大小，默认为1。较大的大小意味着较大的单词。

fontFamily：要使用的字体。

fontWeight：字体重量，例如normal, bold or 600

color：文本的颜色，可以使用关键字random-dark和random-light。也支持颜色矢量。

minSize：字幕的字符串

backgroundColor：背景的颜色。

gridSize：用于标记画布可用性的网格大小，网格大小越大，单词之间的差距越大。

minRotation：文本应该旋转的最小旋转（以rad为单位）。

maxRotation：文本应旋转的最大旋转（以rad为单位）。

rotateRatio：单词旋转的概率。将数字设置为1以始终旋转。

shape：绘制“云”的形状。 ‘circle’ (default), ‘cardioid’ (心形’，苹果或心形曲线，最知名的极坐标方程), ‘diamond’ (菱形), ‘triangle-forward’(三角形前移), ‘triangle’(三角形), ‘pentagon’(五角形), and ‘star

ellipticity：平坦度

figPath：画布路径

例如：
（1）绘制星星图

wordcloud2(demoFreq, size = 1,shape = 'star')

（2）绘制中文

wordcloud2(demoFreqC, size = 2, fontFamily = "微软雅黑",color = "random-light", backgroundColor = "grey")`

`（3）文字云

<span style="color:#ff0000;">letterCloud</span>(demoFreqC,word = "姬", wordSize = 2, fontFamily = "微软雅黑",color = "random-light", backgroundColor = "grey")

(4)自定义图片词云

batman = system.file("examples/picture.png",package = "wordcloud2")  
wordcloud2(demoFreq, figPath = batman, size = 1,color = "black")