How to convert the for-loop from Python to R?

Asked Jan 20 '20 at 06:53

Active Jan 20 '20 at 07:15

Viewed 163 times

I try to convert the @JonathanAllan's Python code to R code. My attempt is below:

library(e1071) # permutations

n <- 24
sideSum <- 42

iterSolutions <- function(sideSum, n){

Q = c(list(seq(1, n)))
for(A in combn(seq(1, n), 4))
{
  if (sum(A) != sideSum) { next }
  Q1 = setdiff(Q, A)
# for a, d, b, c in list(permutations(A))[::2]:
  tmp = permutations(A)
  for ( c(a, d, b, c) in tmp[seq(1, length(tmp), by=2)]){
    for (B in combn(Q1, 3)){
         if (a + sum(B) != sideSum) { next }
         Q2 = setdiff(Q1, B)
    } # for B
    } # for a, b, d, c
} # for A
#......
return c(a, b, d, c)

} # function

Question. How to re-write the for-loop for a, d, b, c in list(permutations(A))[::2]: in R?

edited Jan 20 '20 at 07:15

asked Jan 20 '20 at 06:53

Nick

1,086
7
21

Possible duplicate: https://stackoverflow.com/questions/13461829/select-every-other-element-from-a-vector – sshashank124 Jan 20 '20 at 06:54
what is `a, d, b, c`? Is it the individual value of columns from `permutations(A)` ? – Ronak Shah Jan 20 '20 at 07:21
@RonakShah, it is the individual value – Nick Jan 20 '20 at 07:25
Since the list is a list of tuples, you would use indices in R eg `for (i in x){a <- i[1];d<-i[2];b <-i[3]...}` then you continue. – Onyambu Jan 20 '20 at 07:38

How to convert the for-loop from Python to R?

0 Answers0