Skip to content
master
Switch branches/tags
Code

Latest commit

 

Git stats

Files

Permalink
Failed to load latest commit information.
Type
Name
Latest commit message
Commit time
R
 
 
man
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

writingAssistantR

writingAssistantR provides an R interface for analysing your text with R, yourtext.guru API and cocon.se/sem-eye.com API

yourtext.guru : A Premium Guide is THE list of the most important words of your content targeting a specific query. No need to make extensive literature search, they reversed engineered search engines algorithms in order to speed up your writing process.

sem-eye.com : Metamots allow you to design an efficient internal netlinking and semantic cocoons. Furthermore, you can make it possible to know if the subject of a page is well formulated.

See all documentation for YourText.guru on data-seo.com or data-seo.fr

See all documentation for Cocon.se on
data-seo.fr

Install

Github

library(devtools)
install_github("voltek62/writingAssistantR")

How To use with YourText.guru

  1. Get your token https://yourtext.guru/profil/api

This key must be copied to the root of your project in a txt file : ytg_configuration.txt

token=YOURAPIKEY
debug=FALSE
  1. Create your premium guide
library(writingAssistantR)
library(RCurl)
library(rjson)
library(XML)

initAPI()
status <- getStatus()

guide <- createGuide("crossfit","fr_fr","premium")
guide_id <- guide$guide_id

while(getGuide(guide_id)=="error") {
  print("Your guide is currently being created")
  Sys.sleep(40)
}

print("Your guide is ready")
guide.all <- getGuide(guide_id)
  1. Get your scores for one URL
url <- "http://www.wodnews.com"
scores <- checkGuide(guide_id, url)
library(formattable)
percent(scores)

How To use with Cocon.se or Sem-eye

  1. Get your token You need to contact the authors from Cocon.se for having an access.

This key must be copied to the root of your project in a txt file : sme_configuration.txt

user = 
pass = 
debug = FALSE
  1. Get your lexies
library(writingAssistantR)
library(RCurl)
library(rjson)
library(XML)
library(stringr)

createToken()

checkStatus()

# Get your metamots. It is very important to create directly with the website
metamots <- listMetamots()

# Get your metamot Id
info <- metamots$data[[1]]
metamot_id <- info$mid

# Get all lexies metamot
lexies <- listLexies(metamot_id)
lexie_id <- lexies$name[1]
  1. Get your scores for one URL
url <- "https://www.lequipe.fr/Ilosport/Fitness/Actualites/Dossier-crossfit-1-2-definition-avantages-risques-et-limites-du-crossfit/778028"

model <- listSimulatedLexies(metamot_id,lexie_id)

scores <- scoreLexies(model, lexie_id, url)

library(formattable)
percent(scores)

Thanks to

About

Create easily your premium guide with R. A Premium Guide is the list of the most important words of your content targeting a specific query.

Topics

Resources

License

Releases

No releases published

Packages

No packages published

Languages