Discussion :

[Wicelo]

Bonjour je n'arrive pas à faire fonctionner cette fonction pourtant je suis un tutoriel mais ca ne fonctionne pas.

Sur la page suivante :

http://www.meetup.com/stats-prog-dc/...esc=1&offset=3

il ya des liens de classe memName

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

<a href="http://www.meetup.com/stats-prog-dc/members/94995702/" class="memName">Asuri</a>

J'effectue donc la séquence de commandes suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
>web <- getURL("http://www.meetup.com/stats-prog-dc/members/?sort=chapter_member.atime&desc=1&offset=3", ssl.verifypeer = FALSE)
>webhtml <- htmlTreeParse(web,error=function( ...){},useInternalNodes=TRUE,encoding="UTF-8",trim=TRUE)
>vNames <- xpathSApply(webhtml,'//*[@class="memName "]', xmlValue)
>vNames

Et cela me renvoie "list()" (c'est à dire une liste vide) au lieu de "Asuri".

Quelqu'un connait le package XML ? C'est terrible les aides sont tellement mal faites sur R en général que je comprend pas pourquoi htmlTreeParse(web) ne suffit pas (les arguments ci dessus sont nécessaires sinon xpathSApply renvoie une erreur), de même pourquoi il faut rajouter l'argument "xmlValue" à xpathSApply alors que l'aide de la fonction n'y fait aucune référence ?

Sur maple les aides sont 1000fois meilleures avec des explications claires, tous les arguments et leurs valeurs par défaut ainsi que des vraies sections exemples qui montrent les commandes les résultats associés alors qu'ici je ne vois pas ce qu'il faut faire pour apprendre à se servir des fonctions par soi même...

Voilà merci d'avance de votre aide si des connaisseurs passent par là !

[arm3366]

Bonjour,
Vous avez un problème de syntaxe: double quotte et de simple guillemets dans l'utilisation de la fonction xpathSapply().
Au lieu de

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

'//*[@class="memName "]'

C'est plutot

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

"//*[@class='memName ']"

Sinon, vous n'avez pas aussi besoin de package supplémentaire (pour l'utilisation de la fonction getURL()).

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
library(xml)
webhtml <- htmlParse("http://www.meetup.com/stats-prog-dc/members/?sort=chapter_member.atime&desc=1&offset=3")
vNames <- xpathSApply(webhtml,"//*[@class='memName']", xmlValue)
vNames

Regards !