求教以下这段代码，如何实现这个功能？

x = c(1:20)

N=NULL

for(i in (1:length(x)))

{

N=i^2

}

我现在生成了一个N

> N

[1] 1 4 9 16 25 36 49 64 81 100 121 144 169 196 225 256 289 324 361 400

那么，我现在想要做的是，找到N最小于80的那个，我可以用这个命令实现

> which(N<=80)

[1] 1 2 3 4 5 6 7 8

对应在第8个。

但是我的实现方法还是比较丑陋啊，用什么样的代码，能够直接把这个数字8给我导出来？

谢谢！

i=1

while(i^2<80){

i=i+1

}

i-1

<br />
 x = 1:20<br />
 n = x^2<br />
 max(n[which (n<=80)])<br />
 64</p>
<p> max(which(n<=80))<br />
  8</p>
<p>

</p>

回复第1楼的 caoanroad4800：

为什么不这么用：

<br />
N <- (x <- 1:20) ^ 2<br />

</p>

什么叫做“最小于80的那个”？你是想要做 sum(which(...)) 还是 tail(which(...), 1)？

max(which(n<=80))

回复第5楼的 yzhizai：你这里默认n是排序的。排序的时候

<br />
N <- (x <- 1:20) ^ 2<br />
sum(N<=80)<br />

不排序的时候

<br />
which.max(N[N<=80])<br />

</p>

谢谢各位！大大的受教了！