Bindung Replizieren von Zeilen in einen Datenrahmen

Question

Können Sie den folgenden Code verbessern?

A <- B <- C <- c(-1,1) # for Factorial design 
design <- expand.grid(A=A, B=B,C=C) # for Factorial design 
design <- rbind(design, c(0,0,0),c(0,0,0),c(0,0,0)) # centre points added to design 

Ich möchte die letzte Zeile mit etwas prägnanter machen.

Als ich die rbind (Design, Matrix (0,3,3)) versuchte, stürzte der Code ab. Die Spaltennamen für die Matrix und das Design waren unterschiedlich, was zu Problemen führte. Wenn ich rbind versuchte (Design, rep (c (0,0,0), 3)), habe ich nur eine Zeile angehängt anstatt drei.

Answer 1

Diese Frage wurde uns freundlicherweise von @LyzandeR beantwortet oben

rbind(design, 0, 0, 0) 

, die durch das Recycling jeder der Werte für jede der Zeilen funktioniert.

Daher

A <- B <- C <- c(-1,1) # for Factorial design 
design <- expand.grid(A=A, B=B,C=C) # for Factorial design 
design <- rbind(design,0,0,0) # centre points added to design