Как сгруппировать вектор в списке?

Question

list <- list(
    z = c(a=30000,b=12,c=600,d=10),  
    x = c(a=30000,b=12,c=c(1600,1400,1400,1200),d=c(10,10)) )

$z
    a     b     c     d 
30000    12   600    10 

$x
    a     b    c1    c2    c3    c4    d1    d2 
30000    12  1600  1400  1400  1200    10    10 

Ожидаемый результат:

$x
    a     b             c                d 
30000    12  1600  1400  1400  1200    10  10 

Как предотвратить разделение списка на c1 c2 c3 c4, как это произошло в x? можно ли сохранить все значения в одном векторе ??

EDIT

он работал с этим кодом ниже, но как мне создать общую c функцию для применения в качестве. numeri c каждому элементу списка больше 1?

list<-list(
  z= c(a=30000,b=12,c=600,d=10),  
  x=c(a=30000,b=12,c=list(list(1600,1400,1400,1200)),d=list(list(10,10))))

list$x$c<-as.numeric(list$x$c)
list$x$d<-as.numeric(list$x$d)