Skip to main content
added 174 characters in body
Source Link
Basheer Algohi
  • 20k
  • 1
  • 32
  • 78
list1[[#]]list11=list1[[#]]/list1[[;; # - 1]] & /@ Range[2, Length[list1]]

Fro the second question may be this work:

list22 = list2[[;; # - 1]] & /@ Range[2, Length[list2]]
MapThread[Append, #] & /@ Transpose[{list22, list11}]
list1[[#]]/list1[[;; # - 1]] & /@ Range[2, Length[list1]]
list11=list1[[#]]/list1[[;; # - 1]] & /@ Range[2, Length[list1]]

Fro the second question may be this work:

list22 = list2[[;; # - 1]] & /@ Range[2, Length[list2]]
MapThread[Append, #] & /@ Transpose[{list22, list11}]
Source Link
Basheer Algohi
  • 20k
  • 1
  • 32
  • 78

list1[[#]]/list1[[;; # - 1]] & /@ Range[2, Length[list1]]