unique(property$Agent)
unq_agent = unique(property$Agent)
lix <- c()
for (i in unq_agent) {
j = sum(property$Sold[property$Agent==i])*0.02
x <- c(i = j)
lix <- c(lix, x)
}
print(lix)
i i i i i i i
347.62 25.60 338.60 13.50 14.80 84.82 92.40
i i i i i i i
27.50 218.82 19.10 79.26 95.40 35.60 101.22
i i i i
22.00 17.22 26.30 16.24
If I say x <- c(i) instead x <- c(i = j),
[1] "RayWhite"
[2] "Belle"
[3] "Raine&Horne"
[4] "TraversGray"
[5] "HarrisPartners"
[6] "R&W"
[7] "McGrath"
[8] "BresicWhitney"
[9] "Urbane"
[10] "GreenSquareResidential"
[11] "EeRealEstate"
[12] "Viewey"
[13] "GerberProperties"
[14] "LJHooker"
[15] "Martin"
[16] "OneAgency"
[17] "Iskandar"
[18] "PlanetProperties"
Can you give me solution, please?? I want that i can follow that for loop. So, RayWhite, Belle, Raine&Horne, ... instead i on my first result.