2017-05-28 1 views
0

texte analyse de l'association minièreComment effacer des espaces dans l'analyse de l'association

Comment effacer les espaces

Pour voir le résultat de la création de règles d'association,

Il y a des caractères vides (LHS). (Par exemple cela apparaît)

[1] {}  => {monday} 0.012672811 0.012672811 1.000000 

[2] {}  => {happy} 0.007488479 0.007488479 1.000000 

[3] {}  => {money} 0.007488479 0.007488479 1.000000 

Il doit être supprimé lorsque vous utilisez "arulesViz graph".

Il y a beaucoup de cercles sans nom à cause des espaces.

Que dois-je faire? Merci pour vos conseils.

library(KoNLP) 
library(RColorBrewer) 
library(wordcloud) 

text1<-readLines(file.choose()) 
text1 
Encoding(text1)<- "UTF-8" 


text1 <- readLines(text1) 
lword <- Map(extractNoun,text1) 
lword <- unique(lword) 
lword <- sapply(lword, unique) 
filter1 <- function(x){ 
    nchar(x) <= 4 && nchar(x) >= 2 && is.hangul(x) 
} 
filter2 <- function(x){ 
    Filter(filter1, x) 
} 
lword <- sapply(lword, filter2) 
install.packages("arules") 
library(arules) 
wordtran <- as(lword, "transactions") 
wordtable <- crossTable(wordtran) 
tranrules <- apriori(wordtran, parameter=list(supp=0.01, conf=0.05)) 
inspect(tranrules) 
rules <- labels(tranrules, ruleSep=" ") 
rules <- sapply(rules, strsplit, " ", USE.NAMES=F) 
rulemat <- do.call("rbind", rules) 
#---------------------------------------------  
#▽Association analysis visualization 
#--------------------------------------------- 
install.packages("arulesViz") 
library(arulesViz) 
plot(tranrules, method="graph", control=list(type="items")) 

Répondre

2

C'est copié à partir de la page de manuel de apriori à arules:

Note: Apriori ne crée que des règles avec un élément dans la partie droite (Conséquent)! La valeur par défaut dans APparameter pour minlen est égal à 1. Cela signifie que les règles avec un seul article (à savoir, un antécédent vide/G) comme

{} => {beer} 

sera créé. Ces règles signifient que, quel que soit l'objet impliqué, l'élément de l'ERS apparaîtra avec la probabilité donnée par la confiance de la règle (ce qui équivaut au support). Si vous voulez éviter ces règles, utilisez l'argument parameter=list(minlen=2).