r - RSelenium:用R中的变量替换xpath

Question

我尝试将以下代码中的xpath替换为R中的变量。（我这样做是因为我将使用它来进行for循环。

> webElem <- remDr$findElement(using = 'xpath' , 
    '//*[@id="dashboard-table-body"]/tr[3]')

我在R中创建一个变量，如下所示。

a <- paste0("'" , "/" , "/*" , "[@id=" , '"dashboard-table-body"' ,"]" , "/tr[",3,"]")

    > a
[1] "'//*[@id=\"dashboard-table-body\"]/tr[3]"

使用变量作为输入的输出。

webElem3 <- remDr$findElement(using = 'xpath' , a)
Error:   Summary: InvalidSelector
         Detail: Argument was an invalid selector (e.g. XPath/CSS).
         class: org.openqa.selenium.InvalidSelectorException

但这有效。

webElem3 <- remDr$findElement(using = 'xpath' ,  '//*[@id="dashboard-table-body"]/tr[3]')

Answer 1

一开始，您会使用多余的单引号使表达式无效：

"'//*[@id=\"dashboard-table-body\"]/tr[3]"
 ^HERE

Chrome控制台中的演示：

> $x("'//*[@id=\"dashboard-table-body\"]/tr[3]")
VM11825:215 Uncaught DOMException: Failed to execute 'evaluate' on 'Document': The string ''//*[@id="dashboard-table-body"]/tr[3]' is not a valid XPath expression.(…)$x @ VM11825:215bound @ VM11825:18(anonymous function) @ VM11832:1
> $x("//*[@id=\"dashboard-table-body\"]/tr[3]")
[]