R Cluster Diana - Subprotocol, run to completion

Hello,

I am attempting to use the R Cluster Diana component to do some hierarchical clustering on a series of compound subsets. To do this I am running this component in a subprotocol which I am running to completion.  When I try to do this i get the following error.  The protocol seems to work ok when the subprotocol isn't running to completion.  I have attached s version of the protocol that reads in a SMILES file

>

> source("C:/Program Files (x86)/Scitegic850/apps/scitegic/rstats/lang/R/SciTegic/RFunctions.R")

>

>

> # If data form a distance matrix, no NA values are allowed.

> # Otherwise, only rows with all NA values are disallowed.

>

> diss <- (tolower("False") == "true")

> if (diss) {

+           rdata <- readData("H:/PipelinePilot/web/jobs8/me/{ppcAAC58-EBE7-4D5C-93CB-0DDFF2C07D0F}/temp/CE0F.tmp", removeZeroVar=TRUE, omitNA=TRUE)

+ } else {

+           rdata <- readData("H:/PipelinePilot/web/jobs8/me/{ppcAAC58-EBE7-4D5C-93CB-0DDFF2C07D0F}/temp/CE0F.tmp", removeZeroVar=TRUE)

+           # Omit any records containing NA for all properties

+           keep <- !as.vector(apply(is.na(rdata), 1, all))

+           rdata <- rdata[keep, , drop=FALSE]

+ }

Error in .subset2(x, i, exact = exact) : subscript out of bounds

Calls: readData -> [[ -> [[.data.frame ->

Execution halted

Could anyone suggest a possible solution to this?

Kind regards,

Sam